diff options
| author | Brian Leung <29217594+leungbk@users.noreply.github.com> | 2019-01-23 05:50:25 +0100 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2019-01-22 20:50:25 -0800 |
| commit | 509336d8660e8dba1e996be72433025afca524a9 (patch) | |
| tree | 03ea43a5b250681ca86aebe7f5efcf9f30553762 /src/Text/Pandoc | |
| parent | 3560b02f8bfde83552e721d9eaacf68d4cc6f354 (diff) | |
| download | pandoc-509336d8660e8dba1e996be72433025afca524a9.tar.gz | |
Man reader: fix typo. (#5245)
Diffstat (limited to 'src/Text/Pandoc')
| -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 |