summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--ice-9/ChangeLog6
-rw-r--r--ice-9/boot-9.scm1
2 files changed, 6 insertions, 1 deletions
diff --git a/ice-9/ChangeLog b/ice-9/ChangeLog
index 8501e7274..f1c6b5596 100644
--- a/ice-9/ChangeLog
+++ b/ice-9/ChangeLog
@@ -1,3 +1,9 @@
+Tue May 13 02:48:49 1997 Gary Houston <ghouston@actrix.gen.nz>
+
+ * boot-9.scm (error-catching-loop): don't read a line from
+ current input when quit is encountered, the previous change
+ fixes this too.
+
Mon May 12 19:00:21 1997 Jim Blandy <jimb@floss.cyclic.com>
* boot-9.scm (scm-style-repl): After reading an expression,
diff --git a/ice-9/boot-9.scm b/ice-9/boot-9.scm
index cce9b6fb5..c86e94078 100644
--- a/ice-9/boot-9.scm
+++ b/ice-9/boot-9.scm
@@ -2211,7 +2211,6 @@
(lambda (key . args)
(case key
((quit)
- (read-line) ; discard trailing junk and linefeed.
(force-output)
(set! status args)
#f)