Roff tokenizer: skip .sp in tables.
commitcbeef9f5caa0b96e4dfaa072d61bc8473865e003
authorJohn MacFarlane <jgm@berkeley.edu>
dateFri 26 Oct 2018, 21:37 (8 years ago)
parente0f985b
src/Text/Pandoc/Readers/Roff.hs+2−1
@@ -364,7 +364,8 @@ lexTableRows :: PandocMonad m => RoffLexer m [TableRow]
364364lexTableRows = do
365365 aligns <- tableFormatSpec
366366 spaces
367− skipMany lexComment
367+ skipMany $ lexComment
368+ <|> try (mempty <$ (string ".sp" >> skipMany spaceChar >> newline))
368369 spaces
369370 rows <- many (notFollowedBy (try (string ".TE") <|> try (string ".T&")) >>
370371 tableRow)