From efa2a55cbd069dc74315ca7b4c6a9d3244a70df4 Mon Sep 17 00:00:00 2001
From: Gerd Moellmann <gerd@gnu.org>
Date: Wed, 21 Jul 1999 21:43:52 +0000
Subject: [PATCH] (wait_reading_process_input): Show and hide busy cursor.

---
 src/process.c | 11 +++++++++++
 1 file changed, 11 insertions(+)

diff --git a/src/process.c b/src/process.c
index 80dc4e06140..50b8647aa38 100644
--- a/src/process.c
+++ b/src/process.c
@@ -2314,6 +2314,11 @@ wait_reading_process_input (time_limit, microsecs, read_kbd, do_display)
     {
       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 @@ wait_reading_process_input (time_limit, microsecs, read_kbd, do_display)
      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;
 }
-- 
2.39.5