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.
1 parent 8a3ecb2 commit 1ddda2fCopy full SHA for 1ddda2f
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