# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 790994672 0
# Node ID 7515c28a59d982070b768dff2431ec747e3277dd
# Parent  cbd9cef03245721147224fb1f5fd4765483fb073
(x_destroy_window): Don't let frame being destroyed remain in
x_focus_event_frame.

diff -r cbd9cef03245 -r 7515c28a59d9 src/xterm.c
--- a/src/xterm.c	Wed Jan 25 00:43:25 1995 +0000
+++ b/src/xterm.c	Wed Jan 25 00:44:32 1995 +0000
@@ -1421,9 +1421,9 @@
 
 /* The focus has changed.  Update the frames as necessary to reflect
    the new situation.  Note that we can't change the selected frame
-   here, because the lisp code we are interrupting might become confused.
+   here, because the Lisp code we are interrupting might become confused.
    Each event gets marked with the frame in which it occurred, so the
-   lisp code can tell when the switch took place by examining the events.  */
+   Lisp code can tell when the switch took place by examining the events.  */
 
 static void
 x_new_focus_frame (frame)
@@ -5280,6 +5280,8 @@
   f->display.x = 0;
   if (f == x_focus_frame)
     x_focus_frame = 0;
+  if (f == x_focus_event_frame)
+    x_focus_event_frame = 0;
   if (f == x_highlight_frame)
     x_highlight_frame = 0;