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