git.iko.soy/typeable/pandoc
on master help sign in
Muse reader: make sure that the whole text is parsed
78bec08Alexander Krotov
src/Text/Pandoc/Readers/Muse.hs+1
@@ -130,6 +130,7 @@ parseMuse :: PandocMonad m => MuseParser m Pandoc
130parseMuse = do
130parseMuse = do
131 many directive
131 many directive
132 blocks <- (:) <$> parseBlocks <*> many parseSection
132 blocks <- (:) <$> parseBlocks <*> many parseSection
133+ eof
133 st <- getState
134 st <- getState
134 runF (Pandoc <$> museMeta st <*> fmap B.toList (mconcat blocks)) st <$ reportLogMessages
135 runF (Pandoc <$> museMeta st <*> fmap B.toList (mconcat blocks)) st <$ reportLogMessages
135
136