$OpenBSD: patch-libraries_Cabal_Cabal_Distribution_Simple_Utils_hs,v 1.1 2012/09/02 19:53:46 kili Exp $

Don't strip the error message down to something stupid like `resource
exhausted' (which represents 13 different values of errno).

--- libraries/Cabal/Cabal/Distribution/Simple/Utils.hs.orig	Wed Feb  1 19:10:49 2012
+++ libraries/Cabal/Cabal/Distribution/Simple/Utils.hs	Sat Jun  9 21:36:25 2012
@@ -247,18 +247,7 @@ topHandler prog = catchIO prog handle
       hPutStr stderr (mesage pname)
       exitWith (ExitFailure 1)
       where
-        mesage pname = wrapText (pname ++ ": " ++ file ++ detail)
-        file         = case ioeGetFileName ioe of
-                         Nothing   -> ""
-                         Just path -> path ++ location ++ ": "
-#if defined(__HUGS__) || (defined(__GLASGOW_HASKELL__) && __GLASGOW_HASKELL__ < 608)
-        location     = ""
-#else
-        location     = case ioeGetLocation ioe of
-                         l@(n:_) | n >= '0' && n <= '9' -> ':' : l
-                         _                              -> ""
-#endif
-        detail       = ioeGetErrorString ioe
+        mesage pname = wrapText (pname ++ ": " ++ show ioe)
 
 -- | Non fatal conditions that may be indicative of an error or problem.
 --
