Commit 9e571f49 authored by Gerd Moellmann's avatar Gerd Moellmann

* window.c (Fwindow_live_p): Use WINDOW_LIVE_P.

parent b0b7ed0e
......@@ -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
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment