[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Guile-commits] 01/03: Fix use of port-encoding
From: |
Andy Wingo |
Subject: |
[Guile-commits] 01/03: Fix use of port-encoding |
Date: |
Sat, 7 May 2016 10:43:48 +0000 (UTC) |
wingo pushed a commit to branch wip-port-refactor
in repository guile.
commit bed7bdc19cb15d04e7200a3b0226ba2450f3db50
Author: Andy Wingo <address@hidden>
Date: Thu May 5 23:03:04 2016 +0200
Fix use of port-encoding
* module/ice-9/ports.scm (clear-stream-start-for-bom-read): Fix to use
%port-encoding, which works in symbols.
---
module/ice-9/ports.scm | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/module/ice-9/ports.scm b/module/ice-9/ports.scm
index 7dc13d7..27bcdd8 100644
--- a/module/ice-9/ports.scm
+++ b/module/ice-9/ports.scm
@@ -227,7 +227,7 @@ interpret its input and output."
(lp (1+ i)))))))))
(when (and (port-clear-stream-start-for-bom-read port)
(eq? io-mode 'text))
- (case (port-encoding port)
+ (case (%port-encoding port)
((UTF-8)
(maybe-consume-bom utf8-bom))
((UTF-16)