X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=compat%2FCompat%2FDirectory.hs;h=4d7cb4bde933c5b2851917d20a5cd7bb0c182334;hp=c44b50fd749f44a8b5ddb91a8113680ad3ac42f6;hb=3da243bf737dc3e26dfbfa943df1fda1ce7c1bab;hpb=e85fc273bafab43692ee4e33a2e77144e170dca9

diff --git a/compat/Compat/Directory.hs b/compat/Compat/Directory.hs
index c44b50f..4d7cb4b 100644
--- a/compat/Compat/Directory.hs
+++ b/compat/Compat/Directory.hs
@@ -31,7 +31,7 @@ import Control.Monad		( when )
 import Foreign.Marshal.Alloc	( allocaBytes )
 import System.IO (IOMode(..), openBinaryFile, hGetBuf, hPutBuf, hClose)
 import System.IO.Error		( try )
-import GHC.IOBase ( IOException(..), IOErrorType(..) )
+import GHC.IOBase ( IOException(..) )
 #else
 import System.IO		( try )
 #endif