diff options
Diffstat (limited to 'devel/hs-hdoc/files/patch-Main.hs')
| -rw-r--r-- | devel/hs-hdoc/files/patch-Main.hs | 14 |
1 files changed, 12 insertions, 2 deletions
diff --git a/devel/hs-hdoc/files/patch-Main.hs b/devel/hs-hdoc/files/patch-Main.hs index bbddbb29a822..e241cb0e9044 100644 --- a/devel/hs-hdoc/files/patch-Main.hs +++ b/devel/hs-hdoc/files/patch-Main.hs @@ -1,11 +1,21 @@ --- ./Main.hs.orig 2004-05-18 00:27:27.000000000 +0200 -+++ ./Main.hs 2012-05-13 11:20:13.000000000 +0200 -@@ -5,7 +5,7 @@ ++++ ./Main.hs 2013-04-30 23:59:28.000000000 +0200 +@@ -5,7 +5,8 @@ import List import Maybe import Monad -import System +import System.Environment ++import System.IO.Error import GetOpt import Parser +@@ -338,7 +339,7 @@ + case preProc of + Nothing -> return $ Left (NoPreprocessor file) + Just (msg, action) -> +- do res <- try (readFile file) ++ do res <- tryIOError (readFile file) + case res of + Left _ -> return $ Left NotFound + Right cont -> return $ Right (action cont,msg) |