aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/Readers/Groff.hs
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2018-10-25 22:53:48 -0700
committerJohn MacFarlane <jgm@berkeley.edu>2018-10-25 22:53:48 -0700
commit23ca15e7ad28010d98c3c1fc6b850271b62e9dc2 (patch)
treeeb75b6a649913e3c35d763ea18945f653fb27157 /src/Text/Pandoc/Readers/Groff.hs
parent1ee594bf0e583fd4145765bb429dc9404b9963fe (diff)
downloadpandoc-23ca15e7ad28010d98c3c1fc6b850271b62e9dc2.tar.gz
Man reader: allow empty simple table cells.
Diffstat (limited to 'src/Text/Pandoc/Readers/Groff.hs')
-rw-r--r--src/Text/Pandoc/Readers/Groff.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Readers/Groff.hs b/src/Text/Pandoc/Readers/Groff.hs
index 4bc9d32cc..fbe475b96 100644
--- a/src/Text/Pandoc/Readers/Groff.hs
+++ b/src/Text/Pandoc/Readers/Groff.hs
@@ -356,7 +356,7 @@ tableCell = (enclosedCell <|> simpleCell) >>= lexGroff . T.pack
manyTill anyChar (try (string "T}"))
simpleCell = do
tabChar <- tableTabChar <$> getState
- many1 (notFollowedBy (char tabChar <|> newline) >> anyChar)
+ many (notFollowedBy (char tabChar <|> newline) >> anyChar)
tableRow :: PandocMonad m => GroffLexer m [GroffTokens]
tableRow = do