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

2 files changed, 3 insertions, 1 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index a54e2272d47..e7be006ac8f 100644
--- 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 2cca9b06568..dff842855e8 100644
--- 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.