* lisp/autorevert.el (auto-revert-notify-handler): Use `cl-dolist' since we

rely on cl-return.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 9fe568650465bccd680d88ff71f955ae6a393713..61e9c9bf7083ea2e0a45c5a0240583fc5726f1bd 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2013-09-12  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+       * autorevert.el (auto-revert-notify-handler): Use `cl-dolist' since we
+       rely on cl-return.
+
 2013-09-12  Glenn Morris  <rgm@gnu.org>
 
        * term/ns-win.el (global-map): Remove binding for ispell-next,
@@ -18,8 +23,8 @@
 
        * eshell/esh-mode.el (eshell-mode-syntax-table): Fix up initialization
        (bug#15338).
-       (eshell-self-insert-command, eshell-send-invisible): Remove
-       unused argument.
+       (eshell-self-insert-command, eshell-send-invisible):
+       Remove unused argument.
        (eshell-handle-control-codes): Remove unused var `orig'.
        Avoid delete-backward-char.
 

diff --git a/lisp/autorevert.el b/lisp/autorevert.el
index 0e2b6f32cf311e0ea22d4df22d169aff3c7449ab..65526f07e1b31caf5a2bef5e4a1d0f2024a4f941 100644 (file)
--- a/lisp/autorevert.el
+++ b/lisp/autorevert.el
@@ -548,7 +548,7 @@ will use an up-to-date value of `auto-revert-interval'"
         (cl-assert (stringp file))
         (when (eq action 'renamed) (cl-assert (stringp file1)))
         ;; Loop over all buffers, in order to find the intended one.
-        (dolist (buffer buffers)
+        (cl-dolist (buffer buffers)
           (when (buffer-live-p buffer)
             (with-current-buffer buffer
               (when (and (stringp buffer-file-name)