From 07a7096a4b9c9214062a95001e1653e30a173aae Mon Sep 17 00:00:00 2001 From: Karl Heuer Date: Wed, 24 May 1995 20:37:08 +0000 Subject: (x_connection_closed): Unblock input, first thing. Set Vdefault_minibuffer_frame to t before deleting a frame that might have its own minibuffer. --- src/xterm.c | 12 +++++++++++- 1 file changed, 11 insertions(+), 1 deletion(-) (limited to 'src/xterm.c') diff --git a/src/xterm.c b/src/xterm.c index cf6f698779..da83bf51b8 100644 --- a/src/xterm.c +++ b/src/xterm.c @@ -4352,6 +4352,11 @@ x_connection_closed (display, error_message) struct x_display_info *dpyinfo = x_display_info_for_display (display); Lisp_Object frame, tail; + /* Whatever we were in the middle of, we are going to throw out of it, + so reassure various things that have error checks about being + called with input blocked. */ + TOTALLY_UNBLOCK_INPUT; + if (_Xdebug) abort (); @@ -4375,7 +4380,12 @@ x_connection_closed (display, error_message) FOR_EACH_FRAME (tail, frame) if (FRAME_X_P (XFRAME (frame)) && FRAME_X_DISPLAY_INFO (XFRAME (frame)) == dpyinfo) - Fdelete_frame (frame, Qt); + { + /* Set this to t so that Fdelete_frame won't get confused + trying to find a replacement. */ + FRAME_KBOARD (XFRAME (frame))->Vdefault_minibuffer_frame = Qt; + Fdelete_frame (frame, Qt); + } x_delete_display (dpyinfo); -- cgit v1.2.3