diff --git a/cabal-install/Distribution/Client/Dependency/Modular/Dependency.hs b/cabal-install/Distribution/Client/Dependency/Modular/Dependency.hs index 78c1d4ff57d532d649372abdd7602366c13599d3..f9ecb8991e26d13281b082c957b7485340882448 100644 --- a/cabal-install/Distribution/Client/Dependency/Modular/Dependency.hs +++ b/cabal-install/Distribution/Client/Dependency/Modular/Dependency.hs @@ -52,7 +52,7 @@ type VROrigin qpn = (VR, Goal qpn) -- | Helper function to collapse a list of version ranges with origins into -- a single, simplified, version range. collapse :: [VROrigin qpn] -> VR -collapse = simplifyVR . foldr (.&&.) anyVR . L.map fst +collapse = simplifyVR . L.foldr (.&&.) anyVR . L.map fst showCI :: CI QPN -> String showCI (Fixed i _) = "==" ++ showI i diff --git a/cabal-install/Distribution/Client/Dependency/Modular/Log.hs b/cabal-install/Distribution/Client/Dependency/Modular/Log.hs index 2cf7dd0f40511bcc5b4064c2c9a8a97a2cc8c830..150989dbb8d81c0f3c41d35300eec883b103535e 100644 --- a/cabal-install/Distribution/Client/Dependency/Modular/Log.hs +++ b/cabal-install/Distribution/Client/Dependency/Modular/Log.hs @@ -1,6 +1,7 @@ module Distribution.Client.Dependency.Modular.Log where import Control.Applicative +import Data.List as L import Data.Set as S import Distribution.Client.Dependency.Types -- from Cabal @@ -59,7 +60,7 @@ logToProgress mbj l = let -- the entire tree. go ms (x : xs) r s = Step x (go ms xs r s) go ms [] (Just cs) _ = Fail ("Could not resolve dependencies:\n" ++ - unlines (showMessages (foldr (\ v _ -> v `S.member` cs) True) False ms)) + unlines (showMessages (L.foldr (\ v _ -> v `S.member` cs) True) False ms)) go _ [] _ (Just s) = Done s go _ [] _ _ = Fail ("Could not resolve dependencies.") -- should not happen diff --git a/cabal-install/cabal-install.cabal b/cabal-install/cabal-install.cabal index 1140db0c971b4d21e5d0d5cac5f5947862986926..5d264273957d4c90d1cb95422b2abdd38eb55605 100644 --- a/cabal-install/cabal-install.cabal +++ b/cabal-install/cabal-install.cabal @@ -106,12 +106,12 @@ Executable cabal Paths_cabal_install build-depends: base >= 2 && < 5, - Cabal >= 1.13.3 && < 1.14, - filepath >= 1.0 && < 1.3, + Cabal >= 1.13.3 && < 1.15, + filepath >= 1.0 && < 1.4, network >= 1 && < 3, HTTP >= 4000.0.2 && < 4001, zlib >= 0.4 && < 0.6, - time >= 1.1 && < 1.3, + time >= 1.1 && < 1.5, mtl >= 2.0 && < 3 if flag(old-base) @@ -123,8 +123,8 @@ Executable cabal pretty >= 1 && < 1.2, random >= 1 && < 1.1, containers >= 0.1 && < 0.5, - array >= 0.1 && < 0.4, - old-time >= 1 && < 1.1 + array >= 0.1 && < 0.5, + old-time >= 1 && < 1.2 if flag(bytestring-in-base) build-depends: base >= 2.0 && < 2.2