diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2017-02-20 15:12:20 +0100 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2017-02-20 15:12:20 +0100 |
| commit | 3ccf3fad2c123ebb32904942ff3e552c2402d63b (patch) | |
| tree | ee4b7e0616d583883660af3bc996a717ede8c8bf /src | |
| parent | 59666f79f32b535f9208ff015c810ed859977534 (diff) | |
Removed redundant constraint.
Diffstat (limited to 'src')
| -rw-r--r-- | src/Text/Pandoc/Parsing.hs | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/src/Text/Pandoc/Parsing.hs b/src/Text/Pandoc/Parsing.hs index e0d9c5528..400d07f2a 100644 --- a/src/Text/Pandoc/Parsing.hs +++ b/src/Text/Pandoc/Parsing.hs @@ -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 |