Skip to content
Browse files

Fix building wx-2.8 with GHC 7.6.x

This is wx-2.8 specific change to fix building with GHC 7.6.x.
  • Loading branch information...
1 parent 5149eb3 commit 7a22efcb8ac1355414639836c3e1e7149fda6b1f @shelarcy committed Sep 30, 2012
Showing with 2 additions and 1 deletion.
  1. +2 −1 wxdirect/src/ParseEiffel.hs
View
3 wxdirect/src/ParseEiffel.hs
@@ -20,6 +20,7 @@ import Text.ParserCombinators.Parsec.Language
import Types
import System.Environment ( getEnv )
+import System.IO.Error (catchIOError)
{-----------------------------------------------------------------------------------------
Testing
@@ -33,7 +34,7 @@ test
getDefaultEiffelFiles :: IO [FilePath]
getDefaultEiffelFiles
- = do wxwin <- getEnv "WXWIN" `catch` \err -> return ""
+ = do wxwin <- getEnv "WXWIN" `catchIOError` \err -> return ""
return [wxwin ++ "/wxc/include/wxc_defs.e"
,wxwin ++ "/wxc/ewxw/eiffel/spec/r_2_4/wx_defs.e"]

0 comments on commit 7a22efc

Please sign in to comment.
Something went wrong with that request. Please try again.