Fix misinterpretation of '+' in URI paths, fixes #408

2024-01-03 00:42:01 +08:00 · 2024-01-03 00:42:01 +08:00 · d46bdbf959
parent 55030d83da
commit d46bdbf959
2 changed files with 6 additions and 1 deletions
--- a/cabal.project
+++ b/cabal.project
@ -13,6 +13,11 @@ source-repository-package
  location: https://github.com/fosskers/versions.git
  tag: 7bc3355348aac3510771d4622aff09ac38c9924d

+source-repository-package
+  type: git
+  location: https://github.com/hasufell/uri-bytestring.git
+  tag: 4fb5ed14b500c192e6e7a97f6b2b1eb478806001
+
 package libarchive
  flags: -system-libarchive

--- a/lib/GHCup/Download.hs
+++ b/lib/GHCup/Download.hs
@ -855,7 +855,7 @@ getGpgOpts =
 -- "baz"
 urlBaseName :: ByteString  -- ^ the url path (without scheme and host)
            -> ByteString
-urlBaseName = snd . B.breakEnd (== _slash) . urlDecode False
+urlBaseName = snd . B.breakEnd (== _slash)


 -- | Curl saves all intermediate connect headers as well, not just the last one, so we make an effort to take the