@@ -521,8 +521,6 @@ writeMaybesWith n h =
521521 writeOnNothing = FL.takeEndBy_ isNothing writeNJusts
522522 in FL.many writeOnNothing (writeChunks h)
523523
524−-- > write = 'writeWith' defaultChunkSize
525−--
526524-- | Write a byte stream to a file handle. Combines the bytes in chunks of size
527525-- up to 'defaultChunkSize' before writing. Note that the write behavior
528526-- depends on the 'IOMode' and the current seek position of the handle.
@@ -534,9 +532,7 @@ putBytes = putBytesWith defaultChunkSize
534532-- | Write a byte stream to a socket. Accumulates the input in chunks of
535533-- up to 'defaultChunkSize' bytes before writing.
536534--
537−-- @
538−-- write = 'writeWith' 'defaultChunkSize'
539−-- @
535+-- >>> write = Socket.writeWith defaultChunkSize
540536--
541537{-# INLINE write #-}
542538write :: MonadIO m => Socket -> Fold m Word8 ()