From 072624134b9d8b2aa37f619dc5f828d667c72737 Mon Sep 17 00:00:00 2001
From: Andy Wingo <wingo@pobox.com>
Date: Thu, 21 Jul 2011 09:42:20 +0200
Subject: [PATCH] open-socket-for-url returns port in latin1 encoding

* module/web/client.scm (open-socket-for-uri): Set port encoding to
  latin1, to see if this fixes Nalin Garut's problems.
---
 module/web/client.scm | 1 +
 1 file changed, 1 insertion(+)

diff --git a/module/web/client.scm b/module/web/client.scm
index 321c7dba0..6a04497cf 100644
--- a/module/web/client.scm
+++ b/module/web/client.scm
@@ -48,6 +48,7 @@
                                 (else (symbol->string (uri-scheme uri)))))))
          (s  (socket (addrinfo:fam ai) (addrinfo:socktype ai)
                      (addrinfo:protocol ai))))
+    (set-port-encoding! s "ISO-8859-1")
     (connect s (addrinfo:addr ai))
     ;; Buffer input and output on this port.
     (setvbuf s _IOFBF)