diff options
Diffstat (limited to 'devel/hs-drift/files/patch-src__ChaseImports.hs')
| -rw-r--r-- | devel/hs-drift/files/patch-src__ChaseImports.hs | 12 |
1 files changed, 10 insertions, 2 deletions
diff --git a/devel/hs-drift/files/patch-src__ChaseImports.hs b/devel/hs-drift/files/patch-src__ChaseImports.hs index 61ae0b6c59fa..0150ecfdbbc5 100644 --- a/devel/hs-drift/files/patch-src__ChaseImports.hs +++ b/devel/hs-drift/files/patch-src__ChaseImports.hs @@ -1,11 +1,19 @@ --- ./src/ChaseImports.hs.orig 2008-02-10 15:38:31.000000000 +0100 -+++ ./src/ChaseImports.hs 2012-05-13 11:51:52.000000000 +0200 -@@ -24,7 +24,7 @@ ++++ ./src/ChaseImports.hs 2013-05-01 01:35:21.000000000 +0200 +@@ -24,13 +24,14 @@ import DataP import CommandP import ParseLib2 -import System +import System.Environment ++import System.IO.Error import List import qualified Unlit import Monad + import GenUtil + +-try x = catch (x >>= return . Right) (return . Left) ++try x = catchIOError (x >>= return . Right) (return . Left) + + --- Split up input --------------------------------------------------------- + splitString :: String -> String -> (String,String) |