Man reader: be more forgiving in parsing table format spec.
This commit is contained in:
parent
5945c3b011
commit
3e3854fd4f
1 changed files with 3 additions and 4 deletions
|
@ -383,14 +383,13 @@ tableOption = do
|
|||
tableFormatSpec :: PandocMonad m => GroffLexer m [[TableFormat]]
|
||||
tableFormatSpec = do
|
||||
speclines <- tableFormatSpecLine `sepBy1` (newline <|> char ',')
|
||||
skipMany spacetab
|
||||
char '.'
|
||||
return speclines
|
||||
|
||||
tableFormatSpecLine :: PandocMonad m => GroffLexer m [TableFormat]
|
||||
tableFormatSpecLine = do
|
||||
as <- many1 $ skipMany spacetab >> tableColFormat
|
||||
skipMany spacetab
|
||||
return as
|
||||
tableFormatSpecLine =
|
||||
many1 $ try $ skipMany spacetab >> tableColFormat
|
||||
|
||||
tableColFormat :: PandocMonad m => GroffLexer m TableFormat
|
||||
tableColFormat = do
|
||||
|
|
Loading…
Add table
Reference in a new issue