guile-commits
[Top][All Lists]
Advanced

[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)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]