Inhibit stack support when dist/setup-config exists
This commit is contained in:
parent
8fa3a1e3cf
commit
19e62b0a6a
@ -80,6 +80,12 @@ stackCradle wdir = do
|
|||||||
let cabalDir = takeDirectory cabalFile
|
let cabalDir = takeDirectory cabalFile
|
||||||
|
|
||||||
_stackConfigFile <- MaybeT $ findStackConfigFile cabalDir
|
_stackConfigFile <- MaybeT $ findStackConfigFile cabalDir
|
||||||
|
|
||||||
|
-- If dist/setup-config already exists the user probably wants to use cabal
|
||||||
|
-- rather than stack, or maybe that's just me ;)
|
||||||
|
mCabalSetupCfg <- mightExist $ setupConfigPath "dist"
|
||||||
|
when (isJust mCabalSetupCfg) $ mzero
|
||||||
|
|
||||||
distDir <- MaybeT $ getStackDistDir cabalDir
|
distDir <- MaybeT $ getStackDistDir cabalDir
|
||||||
|
|
||||||
return Cradle {
|
return Cradle {
|
||||||
|
Loading…
Reference in New Issue
Block a user