We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
2 parents 8a3ecb2 + 1ddda2f commit be723b8Copy full SHA for be723b8
servant/src/Servant/Utils/Enter.hs
@@ -65,7 +65,7 @@ logWriterTSNat logger = NT $ \x -> do
65
liftIO $ logger w
66
return a
67
68
--- | Like `logWriterTSNat`, but for strict @WriterT@.
+-- | Like `logWriterTSNat`, but for lazy @WriterT@.
69
logWriterTLNat :: MonadIO m => (w -> IO ()) -> (LWriter.WriterT w m :~> m)
70
logWriterTLNat logger = NT $ \x -> do
71
(a, w) <- LWriter.runWriterT x
0 commit comments