Fix verbosity of git

The lack of parenthesis in this line meant that we'd only see the verbose output from git when we had a `peerLocalDir`. This should fix verbosity of git
haskell · Dec 16, 2024 · c9388d9 · c9388d9
1 parent ed9968c
commit c9388d9
Showing 1 changed file with 5 additions and 4 deletions.
diff --git a/cabal-install/src/Distribution/Client/VCS.hs b/cabal-install/src/Distribution/Client/VCS.hs
@@ -637,10 +637,11 @@ vcsGit =
         cloneArgs =
           ["clone"]
             ++ depthIs1
-            ++ [ "--no-checkout", loc, localDir]
-            ++ case peer of
-              Nothing -> []
-              Just peerLocalDir -> ["--reference", peerLocalDir]
+            ++ ["--no-checkout", loc, localDir]
+            ++ ( case peer of
+                  Nothing -> []
+                  Just peerLocalDir -> ["--reference", peerLocalDir]
+               )
             ++ verboseArg
           where
             loc = srpLocation