Disambiguate catch for older GHC

haskell · Feb 17, 2015 · 9393527 · 9393527
1 parent 81be17f
commit 9393527
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/System/Directory.hs b/System/Directory.hs
@@ -399,7 +399,7 @@ createDirectoryIfMissing create_parents path0
 #else
               canIgnore <- (Posix.isDirectory `fmap` Posix.getFileStatus dir)
 #endif
-                           `catch` ((\ _ -> return (isAlreadyExistsError e))
+                           `E.catch` ((\ _ -> return (isAlreadyExistsError e))
                                     :: IOException -> IO Bool)
               unless canIgnore (throwIO e)
           | otherwise              -> throwIO e