[commit: Cabal] master: Don't use Prelude.catch (3647eab)

[Duncan Coutts]

Repository : ssh://darcs.haskell.org//srv/darcs/packages/Cabal

On branch  : master

http://hackage.haskell.org/trac/ghc/changeset/3647eab933b0a8444b6075ccb0c375c56f9e2ca4

>---------------------------------------------------------------

commit 3647eab933b0a8444b6075ccb0c375c56f9e2ca4
Author: Duncan Coutts <duncan at community.haskell.org>
Date:   Tue May 24 13:19:37 2011 +0000

    Don't use Prelude.catch
    It has been deprecated in ghc-7.2
    and ghc builds core libs with -Werror so we have to comply.

>---------------------------------------------------------------

 Distribution/Simple/Utils.hs |    2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)

diff --git a/Distribution/Simple/Utils.hs b/Distribution/Simple/Utils.hs
index 1981096..3605a66 100644
--- a/Distribution/Simple/Utils.hs
+++ b/Distribution/Simple/Utils.hs
@@ -742,7 +742,7 @@ createDirectoryIfMissingVerbose verbosity create_parents path0
               isDir <- doesDirectoryExist dir
               if isDir then return ()
                        else throwIOIO e
-              ) `catch` ((\_ -> return ()) :: IOException -> IO ())
+              ) `catchIO` ((\_ -> return ()) :: IOException -> IO ())
           | otherwise              -> throwIOIO e
 
 createDirectoryVerbose :: Verbosity -> FilePath -> IO ()