Muse reader: make sure that the whole text is parsed
commit78bec0837d75e563cb82dc9af40c7ce56e9c35ac
authorAlexander Krotov <ilabdsf@gmail.com>
dateSun 21 Oct 2018, 06:42 (8 years ago)
parent8df5995
src/Text/Pandoc/Readers/Muse.hs+1
@@ -130,6 +130,7 @@ parseMuse :: PandocMonad m => MuseParser m Pandoc
130130parseMuse = do
131131 many directive
132132 blocks <- (:) <$> parseBlocks <*> many parseSection
133+ eof
133134 st <- getState
134135 runF (Pandoc <$> museMeta st <*> fmap B.toList (mconcat blocks)) st <$ reportLogMessages
135136