andros/emacs-gpu
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(ibuffer-auto-update-changed): Use dolist' rather than mapcar';

Browse source 
return value is not used.
This commit is contained in:
Juanma Barranquero 2007-10-23 15:57:57 +00:00
parent 700fb4bac4
commit 368851a5f4
2 changed files with 12 additions and 8 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lisp/ChangeLog
View file

@ -1,3 +1,8 @@
2007-10-23 Juanma Barranquero <lekktu@gmail.com>
* ibuf-ext.el (ibuffer-auto-update-changed): Use `dolist' rather
than `mapcar'; return value is not used.
2007-10-23 Dan Nicolaescu <dann@ics.uci.edu>
* progmodes/gud.el (gdb-source-window, gud-tooltip-mode)

15
lisp/ibuf-ext.el
View file

@ -224,13 +224,12 @@ Currently, this only applies to `ibuffer-saved-filters' and
(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 @@ With numeric ARG, enable auto-update if and only if ARG is positive."
(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))