(call_debugger): Cancel busy-cursor.

1 files changed, 5 insertions, 0 deletions

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;