disambiguate Control.Exception.catch for nhc98

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

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 {