From 4af5dddb8a881572bb6622430dc4c45ec02701df Mon Sep 17 00:00:00 2001 From: Daniel Gröber Date: Tue, 26 Sep 2017 14:14:56 +0200 Subject: Fix missing 'lookupEnv' for GHC 7.4 --- CabalHelper/Shared/Common.hs | 1 + 1 file changed, 1 insertion(+) diff --git a/CabalHelper/Shared/Common.hs b/CabalHelper/Shared/Common.hs index f3497bc..bc9354c 100644 --- a/CabalHelper/Shared/Common.hs +++ b/CabalHelper/Shared/Common.hs @@ -92,6 +92,7 @@ appCacheDir :: IO FilePath appCacheDir = ( "cabal-helper") <$> getEnvDefault "XDG_CACHE_HOME" (homeRel cache) where + lookupEnv var = do env <- getEnvironment; return (lookup var env) getEnvDefault var def = lookupEnv var >>= \m -> case m of Nothing -> def; Just x -> return x homeRel path = ( path) <$> getHomeDirectory cache = -- cgit v1.2.3