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 13, 2024 · 9669788 · 9669788
1 parent 62f4bff
commit 9669788
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
@@ -634,10 +634,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