aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/Readers
diff options
context:
space:
mode:
Diffstat (limited to 'src/Text/Pandoc/Readers')
-rw-r--r--src/Text/Pandoc/Readers/Roff.hs6
1 files changed, 3 insertions, 3 deletions
diff --git a/src/Text/Pandoc/Readers/Roff.hs b/src/Text/Pandoc/Readers/Roff.hs
index 6062328f0..183580fce 100644
--- a/src/Text/Pandoc/Readers/Roff.hs
+++ b/src/Text/Pandoc/Readers/Roff.hs
@@ -308,7 +308,7 @@ lexComment = do
try $ string ".\\\""
many Parsec.space
skipMany $ noneOf "\n"
- char '\n'
+ eofline
return mempty
lexMacro :: PandocMonad m => RoffLexer m RoffTokens
@@ -451,7 +451,7 @@ lexConditional = do
-- n means nroff mode
lexNCond :: PandocMonad m => RoffLexer m RoffTokens
lexNCond = do
- char '\n'
+ newline
many1 spacetab
lexGroup <|> manToken
@@ -631,7 +631,7 @@ spaceTabChar = do
return [RoffStr [c]]
lexEmptyLine :: PandocMonad m => RoffLexer m RoffTokens
-lexEmptyLine = char '\n' >> return (singleTok MEmptyLine)
+lexEmptyLine = newline >> return (singleTok MEmptyLine)
manToken :: PandocMonad m => RoffLexer m RoffTokens
manToken = lexComment <|> lexMacro <|> lexLine <|> lexEmptyLine