From 4af5dddb8a881572bb6622430dc4c45ec02701df Mon Sep 17 00:00:00 2001
From: Daniel Gröber <dxld@darkboxed.org>
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(+)

(limited to 'CabalHelper/Shared')

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