disambiguate Control.Exception.catch for nhc98

haskell · Jul 28, 2008 · ff0bcaf · ff0bcaf
1 parent da43b8e
commit ff0bcaf
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 2 deletions.
diff --git a/Distribution/Simple/GHC.hs b/Distribution/Simple/GHC.hs
@@ -127,8 +127,9 @@ import System.Exit              ( ExitCode(..) )
 import System.FilePath          ( (</>), (<.>), takeExtension,
                                   takeDirectory, replaceExtension, splitExtension )
 import System.IO (openFile, IOMode(WriteMode), hClose, hPutStrLn)
+import qualified Control.Exception as Exception (catch)
 import Control.Exception as Exception
-         ( catch, handle, try, Exception(..) )
+         ( handle, try, Exception(..) )
 
 -- -----------------------------------------------------------------------------
 -- Configuring

diff --git a/Distribution/Simple/Program.hs b/Distribution/Simple/Program.hs
@@ -105,7 +105,7 @@ import Distribution.Verbosity
 import System.Directory
          ( doesFileExist, findExecutable )
 import Control.Monad (join, foldM)
-import Control.Exception as Exception (catch)
+import qualified Control.Exception as Exception (catch)
 
 -- | Represents a program which can be configured.
 data Program = Program {