(auto-revert-buffers): Use buffer-live-p.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index a54e2272d47b6d22601bd244af66f7947e80ea02..e7be006ac8f8f4db38ea6f0b7a8451ab3f1bb45d 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,7 @@
 2008-03-26  Stefan Monnier  <monnier@iro.umontreal.ca>
 
+       * autorevert.el (auto-revert-buffers): Use buffer-live-p.
+
        * help-fns.el (describe-function-1, describe-variable): If no
        replacement is provided, don't print "use nil instead".
 

diff --git a/lisp/autorevert.el b/lisp/autorevert.el
index 2cca9b065687afda4aed6d8b32a01644c218bc27..dff842855e8bf7aad76d9ec604c9006288f7e489 100644 (file)
--- a/lisp/autorevert.el
+++ b/lisp/autorevert.el
@@ -530,7 +530,7 @@ the timer when no buffers need to be checked."
                  (not (and auto-revert-stop-on-user-input
                            (input-pending-p))))
        (let ((buf (car bufs)))
-         (if (buffer-name buf)         ; Buffer still alive?
+          (if (buffer-live-p buf)
              (with-current-buffer buf
                ;; Test if someone has turned off Auto-Revert Mode in a
                ;; non-standard way, for example by changing major mode.