changeset 2210:22d78dbb3cc7

Rename `live-window-p' to `window-live-p', for consistency with `frame-live-p'. * window.c (Fwindow_live_p): Renamed from Flive_window_p. * lisp.h (CHECK_LIVE_WINDOW): Change to use Qwindow_live_p. (Qwindow_live_p): Extern declaration renamed fom Qlive_window_p.
author Jim Blandy <jimb@redhat.com>
date Tue, 16 Mar 1993 05:55:57 +0000
parents 7b95f29936cb
children a53385347b85
files src/lisp.h src/window.c
diffstat 2 files changed, 7 insertions(+), 7 deletions(-) [+]
line wrap: on
line diff
--- a/src/lisp.h	Tue Mar 16 05:55:12 1993 +0000
+++ b/src/lisp.h	Tue Mar 16 05:55:57 1993 +0000
@@ -636,7 +636,7 @@
   {							\
     if (XTYPE ((x)) != Lisp_Window			\
 	|| NILP (XWINDOW ((x))->buffer))		\
-      x = wrong_type_argument (Qlive_window_p, (x));	\
+      x = wrong_type_argument (Qwindow_live_p, (x));	\
   }
 
 #define CHECK_PROCESS(x, i) \
@@ -1160,7 +1160,7 @@
 extern Lisp_Object Fvertical_motion (), Findent_to (), Fcurrent_column ();
 
 /* defined in window.c */
-extern Lisp_Object Qwindowp, Qlive_window_p;
+extern Lisp_Object Qwindowp, Qwindow_live_p;
 extern Lisp_Object Fget_buffer_window ();
 extern Lisp_Object Fsave_window_excursion ();
 extern Lisp_Object Fset_window_configuration (), Fcurrent_window_configuration ();
--- a/src/window.c	Tue Mar 16 05:55:12 1993 +0000
+++ b/src/window.c	Tue Mar 16 05:55:57 1993 +0000
@@ -29,7 +29,7 @@
 #include "disptab.h"
 #include "keyboard.h"
 
-Lisp_Object Qwindowp, Qlive_window_p;
+Lisp_Object Qwindowp, Qwindow_live_p;
 
 Lisp_Object Fnext_window (), Fdelete_window (), Fselect_window ();
 Lisp_Object Fset_window_buffer (), Fsplit_window (), Frecenter ();
@@ -102,7 +102,7 @@
   return XTYPE (obj) == Lisp_Window ? Qt : Qnil;
 }
 
-DEFUN ("live-window-p", Flive_window_p, Slive_window_p, 1, 1, 0,
+DEFUN ("window-live-p", Fwindow_live_p, Swindow_live_p, 1, 1, 0,
   "Returns t if OBJ is a window which is currently visible.")
      (obj)
      Lisp_Object obj;
@@ -2873,8 +2873,8 @@
   Qwindowp = intern ("windowp");
   staticpro (&Qwindowp);
 
-  Qlive_window_p = intern ("live-window-p");
-  staticpro (&Qlive_window_p);
+  Qwindow_live_p = intern ("window-live-p");
+  staticpro (&Qwindow_live_p);
 
 #ifndef MULTI_FRAME
   /* Make sure all windows get marked */
@@ -2956,7 +2956,7 @@
   defsubr (&Sminibuffer_window);
   defsubr (&Swindow_minibuffer_p);
   defsubr (&Swindowp);
-  defsubr (&Slive_window_p);
+  defsubr (&Swindow_live_p);
   defsubr (&Spos_visible_in_window_p);
   defsubr (&Swindow_buffer);
   defsubr (&Swindow_height);