# HG changeset patch # User Juanma Barranquero # Date 1193154846 0 # Node ID 3055282f9d8f096869a00de56e37281a3d13ac9b # Parent a86030d75a464aaec08d33ec2b54712f2df64bb1 (ibuffer-auto-update-changed): Use `dolist' rather than `mapcar'; return value is not used. diff -r a86030d75a46 -r 3055282f9d8f lisp/ibuf-ext.el --- a/lisp/ibuf-ext.el Tue Oct 23 15:44:23 2007 +0000 +++ b/lisp/ibuf-ext.el Tue Oct 23 15:54:06 2007 +0000 @@ -224,13 +224,12 @@ (defun ibuffer-auto-update-changed () (when (frame-or-buffer-changed-p 'ibuffer-auto-buffers-changed) - (mapcar #'(lambda (buf) - (ignore-errors - (with-current-buffer buf - (when (and ibuffer-auto-mode - (eq major-mode 'ibuffer-mode)) - (ibuffer-update nil t))))) - (buffer-list)))) + (dolist (buf (buffer-list)) + (ignore-errors + (with-current-buffer buf + (when (and ibuffer-auto-mode + (eq major-mode 'ibuffer-mode)) + (ibuffer-update nil t))))))) ;;;###autoload (defun ibuffer-auto-mode (&optional arg) @@ -243,7 +242,7 @@ (if arg (plusp arg) (not ibuffer-auto-mode))) - (frame-or-buffer-changed-p 'ibuffer-auto-buffers-changed) + (frame-or-buffer-changed-p 'ibuffer-auto-buffers-changed) ; Initialize state vector (add-hook 'post-command-hook 'ibuffer-auto-update-changed) (ibuffer-update-mode-name))