[kaya] specify Exception type in Modules.hs

[Jochen Schmitt]

commit 88f163464b69e21d07eccb8c2532860198d3a7a0
Author: Jochen Schmitt <Jochen at herr-schmitt.de>
Date:   Tue Aug 27 20:08:09 2013 +0200

    specify Exception type in Modules.hs

 kaya-0.5.2-ghc76.patch |   11 ++++++++++-
 1 files changed, 10 insertions(+), 1 deletions(-)
---
diff --git a/kaya-0.5.2-ghc76.patch b/kaya-0.5.2-ghc76.patch
index 158f6b5..a096b43 100644
--- a/kaya-0.5.2-ghc76.patch
+++ b/kaya-0.5.2-ghc76.patch
@@ -1,6 +1,6 @@
 diff -up kaya-0.5.2/compiler/Module.hs.ghc76 kaya-0.5.2/compiler/Module.hs
 --- kaya-0.5.2/compiler/Module.hs.ghc76	2013-08-27 19:21:23.940053299 +0200
-+++ kaya-0.5.2/compiler/Module.hs	2013-08-27 19:24:10.460006363 +0200
++++ kaya-0.5.2/compiler/Module.hs	2013-08-27 20:06:22.148325901 +0200
 @@ -14,8 +14,9 @@ module Module(importVersion, findFile, f
                getAllLibDirs, linkFiles, getObjs) where
  
@@ -12,6 +12,15 @@ diff -up kaya-0.5.2/compiler/Module.hs.ghc76 kaya-0.5.2/compiler/Module.hs
  import Data.List
  import Lib
  import Options
+@@ -252,7 +253,7 @@ findFile (x:xs) path
+          (do --putStrLn $ "Trying " ++ x ++ path
+ 	     f <- readFile (x++path)
+ 	     return (Just f))
+-         (\e -> findFile xs path)
++         (\e :: SomeException -> findFile xs path)
+ 
+ -- Get all the library directories, looking at the options and the
+ -- KAYA_LIBRARY_PATH environment variable.
 diff -up kaya-0.5.2/compiler/Portability64.hs.ghc76 kaya-0.5.2/compiler/Portability64.hs
 --- kaya-0.5.2/compiler/Portability64.hs.ghc76	2009-04-12 12:02:24.000000000 +0200
 +++ kaya-0.5.2/compiler/Portability64.hs	2013-08-27 19:21:23.973051109 +0200