git.iko.soy/typeable/pandoc
on master help sign in
Roff tokenizer: skip .sp in tables.
cbeef9fJohn MacFarlane
src/Text/Pandoc/Readers/Roff.hs+2−1
@@ -364,7 +364,8 @@ lexTableRows :: PandocMonad m => RoffLexer m [TableRow]
364lexTableRows = do
364lexTableRows = do
365 aligns <- tableFormatSpec
365 aligns <- tableFormatSpec
366 spaces
366 spaces
367− skipMany lexComment
367+ skipMany $ lexComment
368+ <|> try (mempty <$ (string ".sp" >> skipMany spaceChar >> newline))
368 spaces
369 spaces
369 rows <- many (notFollowedBy (try (string ".TE") <|> try (string ".T&")) >>
370 rows <- many (notFollowedBy (try (string ".TE") <|> try (string ".T&")) >>
370 tableRow)
371 tableRow)