summaryrefslogtreecommitdiff
path: root/http-client.scm
diff options
context:
space:
mode:
authorPeter Bex <peter@more-magic.net>2021-09-03 16:12:34 +0200
committerPeter Bex <peter@more-magic.net>2021-09-03 16:12:38 +0200
commitf3efa21fb78688b92022304bbb486f7c4eb3b7bb (patch)
treea50793946b7a879c77357c9fdba5c2d35e4ac4b8 /http-client.scm
parent7b9b33e3626be5dc094b7a1629f8f8b2208799df (diff)
downloadhttp-client-f3efa21fb78688b92022304bbb486f7c4eb3b7bb.tar.gz
Also mangle the path when sending to a proxy
That path should also have a trailing slash just like when requesting a regular URI. See #1781
Diffstat (limited to 'http-client.scm')
-rw-r--r--http-client.scm3
1 files changed, 1 insertions, 2 deletions
diff --git a/http-client.scm b/http-client.scm
index a15f6e6..79638c1 100644
--- a/http-client.scm
+++ b/http-client.scm
@@ -591,8 +591,7 @@
host: #f port: #f scheme: #f)))
;; Update path only when it needs to be updated, to
;; avoid unnecessarily mangling it (see #1448)
- (req-uri (if (or (http-connection-proxy con)
- (not (memq (uri-path req-uri) '(() #f))))
+ (req-uri (if (not (memq (uri-path req-uri) '(() #f)))
req-uri
(update-uri req-uri path: '(/ ""))))
(request (write-request (update-request req uri: req-uri)))