diff options
author | Ludovic Courtès <ludo@gnu.org> | 2017-11-11 15:14:54 +0100 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2017-11-11 15:14:54 +0100 |
commit | 6ad28ae3bc6a6d9e95ab7d70510d12c97673a143 (patch) | |
tree | b6251984a401bd1f8bf2f74f4a3d754944080a1f /module/web | |
parent | 7d0d9e2c25c1e872cfc7d14ab5139915f1813d56 (diff) | |
download | guile-6ad28ae3bc6a6d9e95ab7d70510d12c97673a143.tar.gz |
http: Fix typo in proxy handling in 'write-request-line'.
Reported by Mark H Weaver <mhw@netris.org>
at <https://lists.gnu.org/archive/html/guix-devel/2017-11/msg00190.html>.
* module/web/http.scm (write-request-line): Fix more typos introduced in
96b994b6f815747ce2548123cc996d8132bd4781.
Diffstat (limited to 'module/web')
-rw-r--r-- | module/web/http.scm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/module/web/http.scm b/module/web/http.scm index 62f062434..de61c9495 100644 --- a/module/web/http.scm +++ b/module/web/http.scm @@ -1159,9 +1159,9 @@ three values: the method, the URI, and the version." (put-string port "://") (cond ((string-index host #\:) - (put-char #\[ port) - (put-string port host - (put-char port #\]))) + (put-char port #\[) + (put-string port host) + (put-char port #\])) (else (put-string port host))) (unless ((@@ (web uri) default-port?) scheme host-port) |