diff options
| -rw-r--r-- | hadrian/src/Hadrian/Haskell/Cabal/Parse.hs | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/hadrian/src/Hadrian/Haskell/Cabal/Parse.hs b/hadrian/src/Hadrian/Haskell/Cabal/Parse.hs index d34951a5ef..099d5dc96f 100644 --- a/hadrian/src/Hadrian/Haskell/Cabal/Parse.hs +++ b/hadrian/src/Hadrian/Haskell/Cabal/Parse.hs @@ -152,12 +152,12 @@ configurePackage context@Context {..} = do trackArgsHash (target context (Cabal Flags stage) [] []) trackArgsHash (target context (Cabal Setup stage) [] []) verbosity <- getVerbosity - when (verbosity >= Verbose) $ - putProgressInfo $ "| Package " ++ quote (pkgName package) ++ " configuration flags: " ++ unwords argList let v = if verbosity >= Diagnostic then "-v3" else "-v0" + argList' = argList ++ ["--flags=" ++ unwords flagList, v] + when (verbosity >= Verbose) $ + putProgressInfo $ "| Package " ++ quote (pkgName package) ++ " configuration flags: " ++ unwords argList' traced "cabal-configure" $ - C.defaultMainWithHooksNoReadArgs hooks gpd - (argList ++ ["--flags=" ++ unwords flagList, v]) + C.defaultMainWithHooksNoReadArgs hooks gpd argList' dir <- Context.buildPath context files <- liftIO $ getDirectoryFilesIO "." [ dir -/- "include" -/- "**" |