From 61f944833c9ce032faca77ed97fb6c7deb624ec4 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Fri, 16 Jun 1995 23:26:11 +0000 Subject: [PATCH] (Fdelete_frame): Use do_switch_frame directly. (do_switch_frame): No longer static. --- src/frame.c | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/src/frame.c b/src/frame.c index ee7b64eded0..5d9c00c5bc8 100644 --- a/src/frame.c +++ b/src/frame.c @@ -407,7 +407,7 @@ Note that changing the size of one terminal frame automatically affects all.") return frame; } -static Lisp_Object +Lisp_Object do_switch_frame (frame, no_enter, track) Lisp_Object frame, no_enter; int track; @@ -955,7 +955,7 @@ but if the second optional argument FORCE is non-nil, you may do so.") /* Don't let the frame remain selected. */ if (f == selected_frame) - Fhandle_switch_frame (next_frame (frame, Qt), Qnil); + do_switch_frame (next_frame (frame, Qt), Qnil, 0); /* Don't allow minibuf_window to remain on a deleted frame. */ if (EQ (f->minibuffer_window, minibuf_window)) @@ -1248,7 +1248,7 @@ but if the second optional argument FORCE is non-nil, you may do so.") #if 0 /* This isn't logically necessary, and it can do GC. */ /* Don't let the frame remain selected. */ if (XFRAME (frame) == selected_frame) - Fhandle_switch_frame (next_frame (frame, Qt), Qnil); + do_switch_frame (next_frame (frame, Qt), Qnil, 0) #endif /* Don't allow minibuf_window to remain on a deleted frame. */ -- 2.39.2