guile/guile-scsh rw.scm

[Thien-Thi Nguyen]

CVSROOT:        /cvs
Module name:    guile
Changes by:     Thien-Thi Nguyen <address@hidden>       01/07/22 20:54:55

Modified files:
        guile-scsh     : rw.scm 

Log message:
        (generic-write-string): Fix typo in `writer' call.

CVSWeb URLs:
http://savannah.gnu.org/cgi-bin/viewcvs/guile/guile-scsh/rw.scm.diff?cvsroot=OldCVS&tr1=1.13&tr2=1.14&r1=text&r2=text

Patches:
Index: guile/guile-scsh/rw.scm
diff -u guile/guile-scsh/rw.scm:1.13 guile/guile-scsh/rw.scm:1.14
--- guile/guile-scsh/rw.scm:1.13        Sat Jul  7 08:35:28 2001
+++ guile/guile-scsh/rw.scm     Sun Jul 22 20:54:55 2001
@@ -80,7 +80,7 @@
     (if (< i end)
        (catch 'system-error
               (lambda ()
-                (let ((nwritten (writer s target i end i)))
+                (let ((nwritten (writer s target i end)))
                   (loop (+ i nwritten))))
               (lambda args
                 (apply scm-error args))))))