git.iko.soy/typeable/pandoc
on master help sign in
Fixed small mistake in instance for logOutput.
73e343cJohn MacFarlane
src/Text/Pandoc/Class.hs+1−1
compare with master
unifiedsplit
@@ -548,7 +548,7 @@ instance (PandocMonad m, Monoid w) => PandocMonad (WriterT w m) where
548 getModificationTime = lift . getModificationTime
548 getModificationTime = lift . getModificationTime
549 getCommonState = lift getCommonState
549 getCommonState = lift getCommonState
550 putCommonState = lift . putCommonState
550 putCommonState = lift . putCommonState
551− logOutput lvl = lift . report lvl
551+ logOutput lvl = lift . logOutput lvl
552
552
553instance (PandocMonad m, Monoid w) => PandocMonad (RWST r w st m) where
553instance (PandocMonad m, Monoid w) => PandocMonad (RWST r w st m) where
554 lookupEnv = lift . lookupEnv
554 lookupEnv = lift . lookupEnv