Mercurial > emacs

changeset 3688:b9f27ed0228c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(Fdelete_window): Make `frame' a FRAME_PTR and use as such.
author Richard M. Stallman <rms@gnu.org>
date Sat, 12 Jun 1993 17:06:34 +0000
parents 54381151027d
children 82856e3ea14d
files src/window.c
diffstat 1 files changed, 4 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/src/window.c	Sat Jun 12 17:04:51 1993 +0000
+++ b/src/window.c	Sat Jun 12 17:06:34 1993 +0000
@@ -700,9 +700,9 @@
 
   /* Are we trying to delete any frame's selected window?  */
   {
-    Lisp_Object frame = WINDOW_FRAME (XWINDOW (window));
-
-    if (EQ (window, FRAME_SELECTED_WINDOW (XFRAME (frame))))
+    FRAME_PTR frame = WINDOW_FRAME (XWINDOW (window));
+
+    if (EQ (window, FRAME_SELECTED_WINDOW (frame)))
       {
 	Lisp_Object alternative = Fnext_window (window, Qlambda, Qnil);
 
@@ -714,7 +714,7 @@
 	if (EQ (window, selected_window))
 	  Fselect_window (alternative);
 	else
-	  FRAME_SELECTED_WINDOW (XFRAME (frame)) = alternative;
+	  FRAME_SELECTED_WINDOW (frame) = alternative;
       }
   }