aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--Distribution/Helper.hs4
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)"]