From: Richard M. Stallman <rms@gnu.org>
Date: Tue, 5 Mar 1996 17:33:27 +0000 (+0000)
Subject: (wait_reading_process_input):
X-Git-Tag: emacs-19.34~1102
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=5d6c2aa300959bbb694de29a9d9f9f7f096e03df;p=emacs.git

(wait_reading_process_input):
Pass DO_DISPLAY to detect_input_pending_run_timers.

(Fopen_network_stream): Set immediate_quit around gethostbyname.
---

diff --git a/src/process.c b/src/process.c
index 9b244d6d5c8..c9c7aa79545 100644
--- a/src/process.c
+++ b/src/process.c
@@ -1670,7 +1670,10 @@ Fourth arg SERVICE is name of the service desired, or an integer\n\
 #ifdef TRY_AGAIN
       h_errno = 0;
 #endif
+      immediate_quit = 1;
+      QUIT;
       host_info_ptr = gethostbyname (XSTRING (host)->data);
+      immediate_quit = 0;
 #ifdef TRY_AGAIN
       if (! (host_info_ptr == 0 && h_errno == TRY_AGAIN))
 #endif
@@ -2228,10 +2231,10 @@ wait_reading_process_input (time_limit, microsecs, read_kbd, do_display)
 	}
 
       if ((XINT (read_kbd) > 0 || wait_for_cell)
-	  && detect_input_pending_run_timers ())
+	  && detect_input_pending_run_timers (do_display))
 	{
 	  swallow_events (do_display);
-	  if (detect_input_pending_run_timers ())
+	  if (detect_input_pending_run_timers (do_display))
 	    break;
 	}