Tissevert/pandoc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions 1

Removed an 'error' bomb.

Browse source
This commit is contained in:
John MacFarlane 2017-06-20 22:44:09 +02:00
parent c349f0b0ba
commit 6e6324bade
1 changed files with 4 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
src/Text/Pandoc/Readers/Markdown.hs
View file

@ -55,6 +55,7 @@ import qualified Text.Pandoc.Builder as B
import Text.Pandoc.Class (PandocMonad(..), report) import Text.Pandoc.Class (PandocMonad(..), report)
import Text.Pandoc.Definition import Text.Pandoc.Definition
import Text.Pandoc.Emoji (emojis) import Text.Pandoc.Emoji (emojis)
import Text.Pandoc.Error
import Text.Pandoc.Logging import Text.Pandoc.Logging
import Text.Pandoc.Options import Text.Pandoc.Options
import Text.Pandoc.Parsing hiding (tableWith) import Text.Pandoc.Parsing hiding (tableWith)
@ -368,7 +369,9 @@ parseMarkdown = do
-- lookup to get sourcepos -- lookup to get sourcepos
case M.lookup n (stateNotes' st) of case M.lookup n (stateNotes' st) of
Just (pos, _) -> report (NoteDefinedButNotUsed n pos) Just (pos, _) -> report (NoteDefinedButNotUsed n pos)
Nothing -> error "The impossible happened.") notesDefined Nothing -> throwError $
PandocShouldNeverHappenError "note not found")
notesDefined
let doc = runF (do Pandoc _ bs <- B.doc <$> blocks let doc = runF (do Pandoc _ bs <- B.doc <$> blocks
meta <- stateMeta' st meta <- stateMeta' st
return $ Pandoc meta bs) st return $ Pandoc meta bs) st