Commit 30eceb8f authored by Mikhail Glushenkov's avatar Mikhail Glushenkov
Browse files

Merge pull request #1565 from 23Skidoo/configure-constraints

'cabal configure': honor the '--constraint' flag.
parents 9dc4ad74 16836efe
......@@ -45,7 +45,7 @@ import Distribution.PackageDescription.Configuration
import Distribution.Version
( anyVersion, thisVersion )
import Distribution.Simple.Utils as Utils
( notice, info, debug, die )
( notice, debug, die )
import Distribution.System
( Platform )
import Distribution.Verbosity as Verbosity
......@@ -77,10 +77,7 @@ configure verbosity packageDBs repos comp platform conf
maybePlan <- foldProgress logMsg (return . Left) (return . Right)
progress
case maybePlan of
Left message -> do
info verbosity message
setupWrapper verbosity (setupScriptOptions installedPkgIndex) Nothing
configureCommand (const configFlags) extraArgs
Left message -> die message
Right installPlan -> case InstallPlan.ready installPlan of
[pkg@(ConfiguredPackage (SourcePackage _ _ (LocalUnpackedPackage _) _) _ _ _)] ->
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment