# HG changeset patch
# User Gerd Moellmann <gerd@gnu.org>
# Date 932593432 0
# Node ID 5733af0b62ce2ee6e275c45bf4770887bebf7215
# Parent  39dd5c98a114dd04ac37d40bff00935699510615
(wait_reading_process_input): Show and hide busy
cursor.

diff -r 39dd5c98a114 -r 5733af0b62ce src/process.c
--- a/src/process.c	Wed Jul 21 21:43:52 1999 +0000
+++ b/src/process.c	Wed Jul 21 21:43:52 1999 +0000
@@ -2314,6 +2314,11 @@
     {
       int timeout_reduced_for_timers = 0;
 
+#ifdef HAVE_X_WINDOWS
+      if (display_busy_cursor_p)
+	Fx_hide_busy_cursor (Qnil);
+#endif
+
       /* If calling from keyboard input, do not quit
 	 since we want to return C-g as an input character.
 	 Otherwise, do pending quit if requested.  */
@@ -2725,6 +2730,12 @@
      Turn periodic alarms back on */
   start_polling ();
 #endif
+
+#ifdef HAVE_X_WINDOWS
+  if (display_busy_cursor_p)
+    if (!inhibit_busy_cursor)
+      Fx_show_busy_cursor ();
+#endif
    
   return got_some_input;
 }