Fix ambiguity error

1 files changed, 2 insertions, 2 deletions

diff --git a/Distribution/Helper.hs b/Distribution/Helper.hs
index 84a23aa..febd4aa 100644
--- a/Distribution/Helper.hs
+++ b/Distribution/Helper.hs
@@ -47,7 +47,7 @@ import Control.Monad
 import Control.Monad.IO.Class
 import Control.Monad.State.Strict
 import Control.Monad.Reader
-import Control.Exception
+import Control.Exception as E
 import Data.Monoid
 import Data.List
 import Data.Default
@@ -182,7 +182,7 @@ getSomeConfigState = ask >>= \(progs, distdir) -> do
   res <- liftIO $ do
     exe  <- findLibexecExe "cabal-helper-wrapper"
     out <- readProcess exe (distdir:args) ""
-    evaluate (read out) `catch` \(SomeException _) ->
+    evaluate (read out) `E.catch` \(SomeException _) ->
       error $ concat ["getSomeConfigState", ": ", exe, " "
                      , intercalate " " (map show $ distdir:args)
                      , " (read failed)"]