aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc
diff options
context:
space:
mode:
authorAlexander Krotov <ilabdsf@gmail.com>2018-10-21 06:42:17 +0300
committerAlexander Krotov <ilabdsf@gmail.com>2018-10-21 06:42:17 +0300
commit78bec0837d75e563cb82dc9af40c7ce56e9c35ac (patch)
tree61a377b5a021cbd2a3236b11c3a1a4b5cfbe70a5 /src/Text/Pandoc
parent8df59952bf54321a0e24a1e9104324c7ae9c153f (diff)
downloadpandoc-78bec0837d75e563cb82dc9af40c7ce56e9c35ac.tar.gz
Muse reader: make sure that the whole text is parsed
Diffstat (limited to 'src/Text/Pandoc')
-rw-r--r--src/Text/Pandoc/Readers/Muse.hs1
1 files changed, 1 insertions, 0 deletions
diff --git a/src/Text/Pandoc/Readers/Muse.hs b/src/Text/Pandoc/Readers/Muse.hs
index b973486b1..9b48c70aa 100644
--- a/src/Text/Pandoc/Readers/Muse.hs
+++ b/src/Text/Pandoc/Readers/Muse.hs
@@ -130,6 +130,7 @@ parseMuse :: PandocMonad m => MuseParser m Pandoc
parseMuse = do
many directive
blocks <- (:) <$> parseBlocks <*> many parseSection
+ eof
st <- getState
runF (Pandoc <$> museMeta st <*> fmap B.toList (mconcat blocks)) st <$ reportLogMessages