Man reader: allow unescaped " in plain arguments.
commit3ec0b78343c927cedb00eadf057e26bbd61494c2
authorJohn MacFarlane <jgm@berkeley.edu>
dateSat 20 Oct 2018, 22:59 (8 years ago)
parent9593b37
src/Text/Pandoc/Readers/Man.hs+6−1
@@ -337,7 +337,12 @@ lexMacro = do
337337 plainArg = do
338338 -- TODO skip initial spaces, then parse many linePart til a spaec
339339 skipMany spacetab
340− many (macroArg <|> esc <|> regularText)
340+ many (macroArg <|> esc <|> regularText <|> unescapedQuote)
341+ where unescapedQuote = do
342+ char '"'
343+ fonts <- currentFont
344+ return $ RoffStr ("\"", fonts)
345+
341346
342347 quotedArg :: PandocMonad m => ManLexer m [LinePart]
343348 quotedArg = do