From ebe84d580e5f9897b312d7e6748341331e4c4863 Mon Sep 17 00:00:00 2001 From: Daniel Gröber Date: Mon, 25 Sep 2017 13:53:00 +0200 Subject: Make debugging env var name consistent --- CabalHelper/Compiletime/Wrapper.hs | 2 +- CabalHelper/Runtime/Main.hs | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/CabalHelper/Compiletime/Wrapper.hs b/CabalHelper/Compiletime/Wrapper.hs index 0efe8ae..6713944 100644 --- a/CabalHelper/Compiletime/Wrapper.hs +++ b/CabalHelper/Compiletime/Wrapper.hs @@ -112,7 +112,7 @@ guessProgramPaths opts = do overrideVerbosityEnvVar :: Options -> IO Options overrideVerbosityEnvVar opts = do - x <- lookup "GHC_MOD_DEBUG" <$> getEnvironment + x <- lookup "CABAL_HELPER_DEBUG" <$> getEnvironment return $ case x of Just _ -> opts { verbose = True } Nothing -> opts diff --git a/CabalHelper/Runtime/Main.hs b/CabalHelper/Runtime/Main.hs index c7f6652..8895069 100644 --- a/CabalHelper/Runtime/Main.hs +++ b/CabalHelper/Runtime/Main.hs @@ -183,7 +183,7 @@ main = do [cfile] <- filter isCabalFile <$> getDirectoryContents projdir - v <- maybe silent (const deafening) . lookup "GHC_MOD_DEBUG" <$> getEnvironment + v <- maybe silent (const deafening) . lookup "CABAL_HELPER_DEBUG" <$> getEnvironment lbi <- unsafeInterleaveIO $ getPersistBuildConfig distdir gpd <- unsafeInterleaveIO $ readPackageDescription v (projdir cfile) let pd = localPkgDescr lbi -- cgit v1.2.3