# HG changeset patch
# User Gerd Moellmann <gerd@gnu.org>
# Date 954327882 0
# Node ID 55d5c0156349f8d59fcacc0838571ff8c087ed5b
# Parent  5ce6b34b9a96474632da8829cc904077d7d954b9
(call_debugger): Cancel busy-cursor.

diff -r 5ce6b34b9a96 -r 55d5c0156349 src/eval.c
--- a/src/eval.c	Wed Mar 29 10:19:14 2000 +0000
+++ b/src/eval.c	Wed Mar 29 11:04:42 2000 +0000
@@ -213,6 +213,11 @@
   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;