From 92bcc6145a83912abaadef188304a43fa7b85910 Mon Sep 17 00:00:00 2001 From: Chris Hanson Date: Mon, 1 Mar 1999 05:32:04 +0000 Subject: [PATCH] Revert previous change, which was really due to a bug in the runtime system's handling of input events. --- v7/src/edwin/nntp.scm | 14 ++++++-------- 1 file changed, 6 insertions(+), 8 deletions(-) diff --git a/v7/src/edwin/nntp.scm b/v7/src/edwin/nntp.scm index 4e3d145e5..716740f61 100644 --- a/v7/src/edwin/nntp.scm +++ b/v7/src/edwin/nntp.scm @@ -1,6 +1,6 @@ ;;; -*-Scheme-*- ;;; -;;; $Id: nntp.scm,v 1.23 1999/02/28 06:22:09 cph Exp $ +;;; $Id: nntp.scm,v 1.24 1999/03/01 05:32:04 cph Exp $ ;;; ;;; Copyright (c) 1995-1999 Massachusetts Institute of Technology ;;; @@ -984,13 +984,11 @@ replies))) ((eq? numbers numbers*) replies) (if (fix:= 0 (fix:remainder n-received 16)) - (begin - (message msg - n-received - " (" - (integer-round (* n-received 100) n-to-read) - "%)") - (update-screens! #f))) + (message msg + n-received + " (" + (integer-round (* n-received 100) n-to-read) + "%)")) (set! n-received (fix:+ n-received 1)))) (message msg) -- 2.25.1