Use mempty as the clientInstallFlags

haskell · Apr 2, 2019 · 4252120 · 4252120
1 parent 524400b
commit 4252120
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/cabal-install/Distribution/Client/CmdShowBuildInfo.hs b/cabal-install/Distribution/Client/CmdShowBuildInfo.hs
@@ -106,7 +106,7 @@ showBuildInfoAction (configFlags, configExFlags, installFlags, haddockFlags, tes
     verbosity = fromFlagOrDefault silent (configVerbosity configFlags)
     cliConfig = commandLineFlagsToProjectConfig
                   globalFlags configFlags configExFlags
-                  installFlags defaultClientInstallFlags
+                  installFlags mempty -- Not needed here
                   haddockFlags
                   testFlags
 

diff --git a/cabal-install/Distribution/Client/CmdWriteAutogenFiles.hs b/cabal-install/Distribution/Client/CmdWriteAutogenFiles.hs
@@ -96,7 +96,7 @@ writeAutogenFilesAction (configFlags, configExFlags, installFlags, haddockFlags,
       verbosity = fromFlagOrDefault normal (configVerbosity configFlags)
       cliConfig = commandLineFlagsToProjectConfig
                     globalFlags configFlags configExFlags
-                    installFlags defaultClientInstallFlags
+                    installFlags mempty -- Not needed here
                     haddockFlags
                     testFlags
       configured ctx = [p | InstallPlan.Configured p <- InstallPlan.toList (elaboratedPlanToExecute ctx)]