From: Gerd Moellmann <gerd@gnu.org>
Date: Wed, 29 Mar 2000 11:04:42 +0000 (+0000)
Subject: (call_debugger): Cancel busy-cursor.
X-Git-Tag: emacs-pretest-21.0.90~4439
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=237c23b00b16b9ae763f132a04b9bdda03a8723d;p=emacs.git

(call_debugger): Cancel busy-cursor.
---

diff --git a/src/eval.c b/src/eval.c
index 0e39af5ba35..0efa96f07a7 100644
--- a/src/eval.c
+++ b/src/eval.c
@@ -213,6 +213,11 @@ call_debugger (arg)
   if (specpdl_size + 40 > max_specpdl_size)
     max_specpdl_size = specpdl_size + 40;
   
+#ifdef HAVE_X_WINDOWS
+  if (display_busy_cursor_p)
+    cancel_busy_cursor ();
+#endif
+
   debug_on_next_call = 0;
   when_entered_debugger = num_nonmacro_input_events;