diff options
author | Andy Wingo <wingo@pobox.com> | 2011-07-21 09:42:20 +0200 |
---|---|---|
committer | Andy Wingo <wingo@pobox.com> | 2011-07-21 09:42:20 +0200 |
commit | 072624134b9d8b2aa37f619dc5f828d667c72737 (patch) | |
tree | 6b376b09135e5eb6fc33646faebdc255351bc2e8 | |
parent | ecfb148137e62fc4ca9d1b7319c5aa688cec997f (diff) | |
download | guile-072624134b9d8b2aa37f619dc5f828d667c72737.tar.gz |
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.
-rw-r--r-- | module/web/client.scm | 1 |
1 files changed, 1 insertions, 0 deletions
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) |