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)