From 237c23b00b16b9ae763f132a04b9bdda03a8723d Mon Sep 17 00:00:00 2001
From: Gerd Moellmann <gerd@gnu.org>
Date: Wed, 29 Mar 2000 11:04:42 +0000
Subject: [PATCH] (call_debugger): Cancel busy-cursor.

---
 src/eval.c | 5 +++++
 1 file changed, 5 insertions(+)

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;
 
-- 
2.39.5