From 3068c9b63d10e5051b00ce8a45cadc16d92921ef Mon Sep 17 00:00:00 2001 From: Michael Sloan Date: Sat, 2 Jan 2016 20:03:54 -0800 Subject: [PATCH] Add "--recursive" to "stack upgrade --git" --- src/Stack/Upgrade.hs | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/src/Stack/Upgrade.hs b/src/Stack/Upgrade.hs index 30f912f0fb..87fb5a874a 100644 --- a/src/Stack/Upgrade.hs +++ b/src/Stack/Upgrade.hs @@ -56,7 +56,11 @@ upgrade gitRepo mresolver builtHash = return Nothing else do $logInfo "Cloning stack" - let args = [ "clone", repo , "stack", "--depth", "1"] + -- NOTE: "--recursive" was added after v1.0.0 (and before the + -- next release). This means that we can't use submodules in + -- the stack repo until we're comfortable with "stack upgrade + -- --git" not working for earlier versions. + let args = [ "clone", repo , "stack", "--depth", "1", "--recursive"] runCmd (Cmd (Just tmp) "git" menv args) Nothing return $ Just $ tmp $(mkRelDir "stack") Nothing -> do