[stop checking files after finding first newer dependency
John Meacham <john@repetae.net>**20050920015440] hunk ./Ho.hs 335
-                    as <- mapM checkHoDep (hohModDepends hh)
-                    case and as of
+                    let f (a:as) = do
+                            r <- checkHoDep a
+                            if r then f as else return False
+                        f [] = return True
+                    r <- f (hohModDepends hh)
+                    case r of
hunk ./Ho.hs 392
---parseHsSource fn s = case parse s' (SrcLoc fn 1 1) 0 [] of
hunk ./Ho.hs 401
-mapHoBodies sm ho = ho { hoEs = Map.map f (hoEs ho) , hoRules =  E.Rules.mapBodies ( sm) (hoRules ho) } where
+mapHoBodies sm ho = ho { hoEs = Map.map f (hoEs ho) , hoRules =  E.Rules.mapBodies sm (hoRules ho) } where
hunk ./Ho.hs 415
-applyFixups mie ho = ho { hoEs = Map.map f (hoEs ho) , hoRules =  E.Rules.mapBodies (sm) (hoRules ho) } where
+applyFixups mie ho = ho { hoEs = Map.map f (hoEs ho) , hoRules =  E.Rules.mapBodies sm (hoRules ho) } where