Skip to content

Commit 324b811

Browse files
committed
Revert "Reformat"
This reverts commit 4917d57.
1 parent 4917d57 commit 324b811

File tree

1 file changed

+7
-7
lines changed
  • cabal-install/src/Distribution/Client

1 file changed

+7
-7
lines changed

cabal-install/src/Distribution/Client/Config.hs

Lines changed: 7 additions & 7 deletions
Original file line numberDiff line numberDiff line change
@@ -1705,16 +1705,16 @@ postProcessRepo lineno reponameStr repo0 = do
17051705
"file+noindex:" -> do
17061706
-- defer to file-uri package which is more accurate when parsing Windows
17071707
-- paths
1708-
let uri' = BS8.pack $ "file:" ++ uriToString id ((remoteRepoURI repo0){uriScheme = ""}) []
1708+
let uri' = BS8.pack $ "file:" ++ uriToString id ((remoteRepoURI repo0) { uriScheme = "" }) []
17091709
case parseFileURI (if buildOS == Windows then ExtendedWindows else ExtendedPosix) uri' of
17101710
Left{} -> fail $ "Invalid path in URI: " <> show (remoteRepoURI repo0)
17111711
Right uri'' ->
1712-
return $
1713-
Left $
1714-
LocalRepo
1715-
reponame
1716-
(BS8.unpack $ filePath uri'')
1717-
(uriFragment (remoteRepoURI repo0) == "#shared-cache")
1712+
return
1713+
$ Left
1714+
$ LocalRepo
1715+
reponame
1716+
(BS8.unpack $ filePath uri'')
1717+
(uriFragment (remoteRepoURI repo0) == "#shared-cache")
17181718
_ -> do
17191719
let repo = repo0{remoteRepoName = reponame}
17201720

0 commit comments

Comments
 (0)