Tissevert/pandoc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions 1

Removed redundant constraint.

Browse source
This commit is contained in:
John MacFarlane 2017-02-20 15:12:20 +01:00
parent 59666f79f3
commit 3ccf3fad2c
1 changed files with 1 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
src/Text/Pandoc/Parsing.hs
View file

@ -1052,8 +1052,7 @@ logMessage :: (Stream s m a, HasLogMessages st)
logMessage msg = updateState (addLogMessage msg)
-- | Report all the accumulated log messages, according to verbosity level.
reportLogMessages :: (PandocMonad m, Stream s m a, HasLogMessages st)
=> ParserT s st m ()
reportLogMessages :: (PandocMonad m, HasLogMessages st) => ParserT s st m ()
reportLogMessages = do
msgs <- getLogMessages <$> getState
mapM_ report msgs