From: Richard M. Stallman <rms@gnu.org>
Date: Mon, 15 Apr 1996 19:12:01 +0000 (+0000)
Subject: (wait_reading_process_input) [!subprocesses]:
X-Git-Tag: emacs-19.34~836
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=1861b214270c9c0d2639c19db9fcc967c55ac438;p=emacs.git

(wait_reading_process_input) [!subprocesses]:
Get rid of the loop around the detect_input_pending call.
---

diff --git a/src/process.c b/src/process.c
index 6db62dc6f35..e74e1ed7b56 100644
--- a/src/process.c
+++ b/src/process.c
@@ -3953,19 +3953,14 @@ wait_reading_process_input (time_limit, microsecs, read_kbd, do_display)
 	    set_waiting_for_input (&timeout);
 	}
 
-      {
-	int old_timers_run = timers_run;
-	if (XINT (read_kbd) && detect_input_pending ())
-	  {
-	    nfds = 0;
-	    FD_ZERO (&waitchannels);
-	  }
-	else if (timers_run != old_timers_run)
-	  ;
-	else
-	  nfds = select (1, &waitchannels, (SELECT_TYPE *)0, (SELECT_TYPE *)0,
-			 &timeout);
-      }
+      if (XINT (read_kbd) && detect_input_pending ())
+	{
+	  nfds = 0;
+	  FD_ZERO (&waitchannels);
+	}
+      else
+	nfds = select (1, &waitchannels, (SELECT_TYPE *)0, (SELECT_TYPE *)0,
+		       &timeout);
 
       xerrno = errno;