# HG changeset patch
# User Jim Blandy <jimb@redhat.com>
# Date 741750804 0
# Node ID 020fe391d5c138fb4372fe3240a41675288c0392
# Parent  6851e4266920946a5716d9cf2433c4a3e7403ac1
	* frame.c (Fredirect_frame_focus): Allow redirection of focus of
	dead frames.

diff -r 6851e4266920 -r 020fe391d5c1 src/frame.c
--- a/src/frame.c	Sun Jul 04 01:46:30 1993 +0000
+++ b/src/frame.c	Sun Jul 04 01:53:24 1993 +0000
@@ -980,7 +980,10 @@
   (frame, focus_frame)
     Lisp_Object frame, focus_frame;
 {
-  CHECK_LIVE_FRAME (frame, 0);
+  /* Note that we don't check for a live frame here.  It's reasonable
+     to redirect the focus of a frame you're about to delete, if you
+     know what other frame should receive those keystrokes.  */
+  CHECK_FRAME (frame, 0);
 
   if (! NILP (focus_frame))
     CHECK_LIVE_FRAME (focus_frame, 1);