summaryrefslogtreecommitdiff
path: root/Connection/Tcp.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Connection/Tcp.hs')
-rw-r--r--Connection/Tcp.hs5
1 files changed, 1 insertions, 4 deletions
diff --git a/Connection/Tcp.hs b/Connection/Tcp.hs
index 9a44f34f..e6be15b7 100644
--- a/Connection/Tcp.hs
+++ b/Connection/Tcp.hs
@@ -60,10 +60,7 @@ import System.IO
60 , hWaitForInput 60 , hWaitForInput
61 , hClose 61 , hClose
62 , hIsEOF 62 , hIsEOF
63 , stderr
64 , Handle 63 , Handle
65 , hFlush
66 , hPutStrLn
67 ) 64 )
68import Network.Socket as Socket 65import Network.Socket as Socket
69import Network.BSD 66import Network.BSD
@@ -759,7 +756,7 @@ bshow :: Show a => a -> ByteString
759bshow e = S.pack . show $ e 756bshow e = S.pack . show $ e
760 757
761warn :: ByteString -> IO () 758warn :: ByteString -> IO ()
762warn str =dputB XMisc str >> hFlush stderr 759warn str =dputB XMisc str
763 760
764debugNoise :: Monad m => t -> m () 761debugNoise :: Monad m => t -> m ()
765debugNoise str = return () 762debugNoise str = return ()