changeset 27867:aa784365f0a0

(recursive_edit_1): Cancel busy-cursor.
author Gerd Moellmann <gerd@gnu.org>
date Fri, 25 Feb 2000 14:05:03 +0000
parents 444c6353b03a
children b5dc290eb929
files src/keyboard.c
diffstat 1 files changed, 8 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/src/keyboard.c	Fri Feb 25 13:35:37 2000 +0000
+++ b/src/keyboard.c	Fri Feb 25 14:05:03 2000 +0000
@@ -858,6 +858,14 @@
       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);