# HG changeset patch # User John Paul Wallington # Date 1125211829 0 # Node ID 6705c5e7dee2ba9af8377568d49df30d32d33674 # Parent a308f717214a95ed07b533e0a33f57bc3bc4640e (ibuffer-auto-update-changed): Use `frame-or-buffer-changed-p' to check whether we need to update. (ibuffer-auto-mode): Don't advise `get-buffer-create' and `kill-buffer'. Initialise `ibuffer-auto-buffers-changed' as a `frame-or-buffer-changed-p' state vector instead. diff -r a308f717214a -r 6705c5e7dee2 lisp/ibuf-ext.el --- a/lisp/ibuf-ext.el Sat Aug 27 22:01:23 2005 +0000 +++ b/lisp/ibuf-ext.el Sun Aug 28 06:50:29 2005 +0000 @@ -222,8 +222,7 @@ (ibuffer-buf-matches-predicates buf ibuffer-always-show-predicates))))) (defun ibuffer-auto-update-changed () - (when ibuffer-auto-buffers-changed - (setq ibuffer-auto-buffers-changed nil) + (when (frame-or-buffer-changed-p 'ibuffer-auto-buffers-changed) (mapcar #'(lambda (buf) (ignore-errors (with-current-buffer buf @@ -243,10 +242,7 @@ (if arg (plusp arg) (not ibuffer-auto-mode))) - (defadvice get-buffer-create (after ibuffer-notify-create activate) - (setq ibuffer-auto-buffers-changed t)) - (defadvice kill-buffer (after ibuffer-notify-kill activate) - (setq ibuffer-auto-buffers-changed t)) + (frame-or-buffer-changed-p 'ibuffer-auto-buffers-changed) (add-hook 'post-command-hook 'ibuffer-auto-update-changed) (ibuffer-update-mode-name))