Revert "Reformat"

This reverts commit 4917d57.
haskell · Dec 20, 2024 · 324b811 · 324b811
1 parent 4917d57
commit 324b811
Showing 1 changed file with 7 additions and 7 deletions.
diff --git a/cabal-install/src/Distribution/Client/Config.hs b/cabal-install/src/Distribution/Client/Config.hs
@@ -1705,16 +1705,16 @@ postProcessRepo lineno reponameStr repo0 = do
     "file+noindex:" -> do
       -- defer to file-uri package which is more accurate when parsing Windows
       -- paths
-      let uri' = BS8.pack $ "file:" ++ uriToString id ((remoteRepoURI repo0){uriScheme = ""}) []
+      let uri' = BS8.pack $ "file:" ++ uriToString id ((remoteRepoURI repo0) { uriScheme = "" }) []
       case parseFileURI (if buildOS == Windows then ExtendedWindows else ExtendedPosix) uri' of
         Left{} -> fail $ "Invalid path in URI: " <> show (remoteRepoURI repo0)
         Right uri'' ->
-          return $
-            Left $
-              LocalRepo
-                reponame
-                (BS8.unpack $ filePath uri'')
-                (uriFragment (remoteRepoURI repo0) == "#shared-cache")
+            return
+          $ Left
+          $ LocalRepo
+              reponame
+              (BS8.unpack $ filePath uri'')
+              (uriFragment (remoteRepoURI repo0) == "#shared-cache")
     _ -> do
       let repo = repo0{remoteRepoName = reponame}