Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in / Register
Toggle navigation
Menu
Open sidebar
Glasgow Haskell Compiler
Packages
Cabal
Commits
e9ed987b
Commit
e9ed987b
authored
Jul 07, 2018
by
Alexis Williams
Browse files
Fix logic error in CmdInstall
parent
330409b1
Changes
1
Hide whitespace changes
Inline
Side-by-side
cabal-install/Distribution/Client/CmdInstall.hs
View file @
e9ed987b
...
...
@@ -408,17 +408,18 @@ installAction (configFlags, configExFlags, installFlags, haddockFlags)
$
Map
.
toList
$
targetsMap
buildCtx
runProjectPostBuildPhase
verbosity
baseCtx
buildCtx
buildOutcomes
unless
supportsPkgEnvFiles
$
do
warn
verbosity
"The current compiler doesn't support safely installing libraries. (GHC 8.0+ only)"
let
baseEntries
=
GhcEnvFileClearPackageDbStack
:
fmap
GhcEnvFilePackageDb
packageDbs
entries
=
baseEntries
++
entriesForLibraryComponents
(
targetsMap
buildCtx
)
entries'
=
nub
(
envEntries
++
entries
)
contents'
=
renderGhcEnvironmentFile
entries'
createDirectoryIfMissing
True
(
takeDirectory
envFile
)
writeFileAtomic
envFile
(
BS
.
pack
contents'
)
if
supportsPkgEnvFiles
then
do
let
baseEntries
=
GhcEnvFileClearPackageDbStack
:
fmap
GhcEnvFilePackageDb
packageDbs
entries
=
baseEntries
++
entriesForLibraryComponents
(
targetsMap
buildCtx
)
entries'
=
nub
(
envEntries
++
entries
)
contents'
=
renderGhcEnvironmentFile
entries'
createDirectoryIfMissing
True
(
takeDirectory
envFile
)
writeFileAtomic
envFile
(
BS
.
pack
contents'
)
else
warn
verbosity
"The current compiler doesn't support safely installing libraries. (GHC 8.0+ only)"
where
configFlags'
=
disableTestsBenchsByDefault
configFlags
verbosity
=
fromFlagOrDefault
normal
(
configVerbosity
configFlags'
)
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment