diff options
| -rw-r--r-- | src/Text/Pandoc/Readers/Man.hs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/Text/Pandoc/Readers/Man.hs b/src/Text/Pandoc/Readers/Man.hs index db61a5025..7ec1c4ec6 100644 --- a/src/Text/Pandoc/Readers/Man.hs +++ b/src/Text/Pandoc/Readers/Man.hs @@ -104,7 +104,7 @@ parseBlock = choice [ parseList , parseBlockQuote , parseNewParagraph , parsePara - , skipUnkownMacro + , skipUnknownMacro ] parseTable :: PandocMonad m => ManParser m Blocks @@ -507,8 +507,8 @@ parseEmailLink args = do [] -> mempty (x:_) -> linePartsToInlines x -skipUnkownMacro :: PandocMonad m => ManParser m Blocks -skipUnkownMacro = do +skipUnknownMacro :: PandocMonad m => ManParser m Blocks +skipUnknownMacro = do tok <- mmacroAny case tok of ControlLine mkind _ pos -> do |