diff src/window.c @ 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.

--- 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);