Skip to content

Commit

Permalink
Trim before checking with parseURI
Browse files Browse the repository at this point in the history
  • Loading branch information
philderbeast committed Dec 9, 2024
1 parent 01e3eaf commit 5f6822d
Showing 1 changed file with 2 additions and 1 deletion.
Original file line number Diff line number Diff line change
Expand Up @@ -141,6 +141,7 @@ import Distribution.Utils.NubList
, overNubList
, toNubList
)
import Distribution.Utils.String (trim)

import Distribution.Client.HttpUtils
import Distribution.Client.ParseUtils
Expand Down Expand Up @@ -342,7 +343,7 @@ parseProjectSkeleton cacheDir httpTransport verbosity projectDir source (Project
fetch pci

fetch :: FilePath -> IO BS.ByteString
fetch pci = case parseURI pci of
fetch pci = case parseURI $ trim pci of
Just uri -> do
let fp = cacheDir </> map (\x -> if isPathSeparator x then '_' else x) (makeValid $ show uri)
createDirectoryIfMissing True cacheDir
Expand Down

0 comments on commit 5f6822d

Please sign in to comment.