Man reader: use report instead of logMessage.
This commit is contained in:
parent
e15b5b360f
commit
e9c422649d
1 changed files with 6 additions and 2 deletions
|
@ -463,7 +463,7 @@ parseSkippedContent = do
|
||||||
onToken :: PandocMonad m => ManToken -> ManParser m ()
|
onToken :: PandocMonad m => ManToken -> ManParser m ()
|
||||||
onToken (MUnknownMacro mname _) = do
|
onToken (MUnknownMacro mname _) = do
|
||||||
pos <- getPosition
|
pos <- getPosition
|
||||||
logMessage $ SkippedContent ("Unknown macro: " ++ mname) pos
|
report $ SkippedContent ("Unknown macro: " ++ mname) pos
|
||||||
onToken _ = return ()
|
onToken _ = return ()
|
||||||
|
|
||||||
strToInlines :: RoffStr -> Inlines
|
strToInlines :: RoffStr -> Inlines
|
||||||
|
@ -592,4 +592,8 @@ parseList = do
|
||||||
|
|
||||||
-- In case of weird man file it will be parsed succesfully
|
-- In case of weird man file it will be parsed succesfully
|
||||||
parseSkipMacro :: PandocMonad m => ManParser m Blocks
|
parseSkipMacro :: PandocMonad m => ManParser m Blocks
|
||||||
parseSkipMacro = mmacroAny >> mempty
|
parseSkipMacro = do
|
||||||
|
pos <- getPosition
|
||||||
|
tok <- mmacroAny
|
||||||
|
report $ SkippedContent (show tok) pos
|
||||||
|
return mempty
|
||||||
|
|
Loading…
Reference in a new issue