From a2b881236d4061c6f668948958da87a177a4474f Mon Sep 17 00:00:00 2001
From: Gerd Moellmann <gerd@gnu.org>
Date: Fri, 25 Feb 2000 14:05:03 +0000
Subject: (recursive_edit_1): Cancel busy-cursor.

---
 src/keyboard.c | 8 ++++++++
 1 file changed, 8 insertions(+)

(limited to 'src')

diff --git a/src/keyboard.c b/src/keyboard.c
index ff94b42677c..75bafc28b83 100644
--- a/src/keyboard.c
+++ b/src/keyboard.c
@@ -858,6 +858,14 @@ recursive_edit_1 ()
       specbind (Qstandard_input, Qt);
     }
 
+#ifdef HAVE_X_WINDOWS
+  /* The command loop has started a busy-cursor timer, so we have to
+     cancel it here, otherwise it will fire because the recursive edit
+     can take some time.  */
+  if (display_busy_cursor_p)
+    cancel_busy_cursor ();
+#endif
+
   val = command_loop ();
   if (EQ (val, Qt))
     Fsignal (Qquit, Qnil);
-- 
cgit v1.2.1