From 4438ff17fb2ce8a1d9991e5c530aaaf5547b7bc4 Mon Sep 17 00:00:00 2001 From: Jesse Rosenthal Date: Thu, 18 Feb 2016 23:35:38 -0500 Subject: LaTeX writer: clean up options parser. Make sure that we require the closing bracket. --- src/Text/Pandoc/Writers/LaTeX.hs | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) (limited to 'src/Text') diff --git a/src/Text/Pandoc/Writers/LaTeX.hs b/src/Text/Pandoc/Writers/LaTeX.hs index 5ac166de2..4e4279ec5 100644 --- a/src/Text/Pandoc/Writers/LaTeX.hs +++ b/src/Text/Pandoc/Writers/LaTeX.hs @@ -1259,10 +1259,11 @@ deNote x = x pDocumentOptions :: P.Parsec String () [String] pDocumentOptions = do P.char '[' - P.sepBy - (P.many $ - P.spaces *> P.noneOf (" ,]" :: String) <* P.spaces) + opts <- P.sepBy + (P.many $ P.spaces *> P.noneOf (" ,]" :: String) <* P.spaces) (P.char ',') + P.char ']' + return opts pDocumentClass :: P.Parsec String () String pDocumentClass = -- cgit v1.2.3