aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/Readers/Roff.hs
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2018-11-02 23:06:50 -0700
committerJohn MacFarlane <jgm@berkeley.edu>2018-11-02 23:06:50 -0700
commit30dbd6a98127867301a9bb478bcb230b1dca5b6d (patch)
treebdb173e3801afe0bb5875ec93299b2d68f59b0f1 /src/Text/Pandoc/Readers/Roff.hs
parent9719b0c74c8266a63b40dfacfe83f03de9c1d62a (diff)
downloadpandoc-30dbd6a98127867301a9bb478bcb230b1dca5b6d.tar.gz
Roff reader: tbl improvements.
Diffstat (limited to 'src/Text/Pandoc/Readers/Roff.hs')
-rw-r--r--src/Text/Pandoc/Readers/Roff.hs3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Readers/Roff.hs b/src/Text/Pandoc/Readers/Roff.hs
index 8121bedfe..2ec79ddb2 100644
--- a/src/Text/Pandoc/Readers/Roff.hs
+++ b/src/Text/Pandoc/Readers/Roff.hs
@@ -548,7 +548,8 @@ lexGroup = do
where
groupstart = try $ string "\\{\\" >> newline
groupend = try $ optional (char '.' >> many spacetab) >>
- string "\\}" >> eofline
+ string "\\}" >> (lexLine <|> lexEmptyLine)
+ -- could be comment
lexIncludeFile :: PandocMonad m => [Arg] -> RoffLexer m RoffTokens
lexIncludeFile args = do