From: Karl Heuer <kwzh@gnu.org>
Date: Sat, 13 Jul 1996 17:50:47 +0000 (+0000)
Subject: (wait_reading_process_input) [hpux]: Workaround for
X-Git-Tag: emacs-19.34~201
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=e07d54499f933e4cdcc2810013793695fc1adc83;p=emacs.git

(wait_reading_process_input) [hpux]: Workaround for
annoying messages.
---

diff --git a/src/process.c b/src/process.c
index ffaa0598f9b..a527066277b 100644
--- a/src/process.c
+++ b/src/process.c
@@ -2037,6 +2037,14 @@ wait_reading_process_input (time_limit, microsecs, read_kbd, do_display)
       EMACS_SET_SECS_USECS (timeout, time_limit, microsecs);
       EMACS_ADD_TIME (end_time, end_time, timeout);
     }
+#ifdef hpux
+  /* AlainF 5-Jul-1996
+     HP-UX 10.10 seem to have problems with signals coming in
+     Causes "poll: interrupted system call" messages when Emacs is run
+     in an X window
+     Turn off periodic alarms (in case they are in use) */
+  stop_polling ();
+#endif
 
   while (1)
     {
@@ -2391,7 +2399,15 @@ wait_reading_process_input (time_limit, microsecs, read_kbd, do_display)
       clear_input_pending ();
       QUIT;
     }
-
+#ifdef hpux
+  /* AlainF 5-Jul-1996
+     HP-UX 10.10 seems to have problems with signals coming in
+     Causes "poll: interrupted system call" messages when Emacs is run
+     in an X window
+     Turn periodic alarms back on */
+  start_polling();
+#endif
+   
   return got_some_input;
 }