* window.c (Fwindow_live_p): Use WINDOW_LIVE_P.

diff --git a/src/window.c b/src/window.c
index fe899c8..80400dd 100644 (file)
--- a/src/window.c
+++ b/src/window.c
@@ -226,7 +226,7 @@ DEFUN ("window-live-p", Fwindow_live_p, Swindow_live_p, 1, 1, 0,
      (object)
      Lisp_Object object;
 {
-  return (WINDOWP (object) && ! NILP (XWINDOW (object)->buffer) ? Qt : Qnil);
+  return WINDOW_LIVE_P (object) ? Qt : Qnil;
 }
 
 Lisp_Object