[Guile-commits] 01/07: Remove textual-ports include from (ice-9 read)

[Andy Wingo]

wingo pushed a commit to branch master
in repository guile.

commit c802ed4832ed159b21ac012f65fd49505fcdc6f2
Author: Andy Wingo <wingo@pobox.com>
AuthorDate: Mon Mar 1 20:56:59 2021 +0100

    Remove textual-ports include from (ice-9 read)
    
    * module/ice-9/read.scm: We'll be loading this file early, so avoid
    extraneous deps.
---
 module/ice-9/read.scm | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/module/ice-9/read.scm b/module/ice-9/read.scm
index a1e4e7a..8d9faca 100644
--- a/module/ice-9/read.scm
+++ b/module/ice-9/read.scm
@@ -41,7 +41,6 @@
 
 (define-module (ice-9 read)
   #:use-module (srfi srfi-11)
-  #:use-module (ice-9 textual-ports)
   #:use-module (rnrs bytevectors)
   #:replace (read)
   #:export (read-syntax))
@@ -419,7 +418,7 @@
                          (next)
                          (lp (1+ i)))
                        (begin
-                         (unget-char port ch)
+                         (unread-char port ch)
                          #f))))))))
 
   (define (read-false-or-srfi-4-vector)