diff --git a/lib/hs/src/TChannelTransport.hs b/lib/hs/src/TChannelTransport.hs
index d704c3a..b67751a 100644
--- a/lib/hs/src/TChannelTransport.hs
+++ b/lib/hs/src/TChannelTransport.hs
@@ -18,10 +18,14 @@
 --
 
 module TChannelTransport(TChannelTrans(..)) where
-import System.IO
-import IO
+
 import Thrift
 import Control.Exception
+
+import System.IO
+import System.IO.Error ( isEOFError )
+
+
 data TChannelTrans = TChannelTrans (Handle)
 
 instance TTransport TChannelTrans where
diff --git a/lib/hs/src/TSocket.hs b/lib/hs/src/TSocket.hs
index a04739a..1e00261 100644
--- a/lib/hs/src/TSocket.hs
+++ b/lib/hs/src/TSocket.hs
@@ -18,11 +18,15 @@
 --
 
 module TSocket(TSocket(..)) where
+
 import Thrift
 import Data.IORef
 import Network
-import IO
 import Control.Exception
+
+import System.IO
+
+
 data TSocket = TSocket{host::[Char],port::PortNumber,chan :: Maybe Handle}
 
 instance TTransport TSocket where