diff options
| author | Deepak Goel <deego@gnufans.org> | 2009-03-13 19:43:38 +0000 |
|---|---|---|
| committer | Deepak Goel <deego@gnufans.org> | 2009-03-13 19:43:38 +0000 |
| commit | f5fbd9ad219df87e468dd3a35b6df37af5f49d6b (patch) | |
| tree | a3c8ac96e0d0b55bca11176baad605b993742e00 /lisp/ibuf-ext.el | |
| parent | bf020df6ea28468be7d6e75b458ce0ab73cc1e91 (diff) | |
| download | emacs-f5fbd9ad219df87e468dd3a35b6df37af5f49d6b.tar.gz emacs-f5fbd9ad219df87e468dd3a35b6df37af5f49d6b.tar.bz2 emacs-f5fbd9ad219df87e468dd3a35b6df37af5f49d6b.zip | |
M-v correctness.
Diffstat (limited to 'lisp/ibuf-ext.el')
| -rw-r--r-- | lisp/ibuf-ext.el | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/lisp/ibuf-ext.el b/lisp/ibuf-ext.el index fb68345be94..73c5840aefa 100644 --- a/lisp/ibuf-ext.el +++ b/lisp/ibuf-ext.el @@ -544,10 +544,11 @@ To evaluate a form without viewing the buffer, see `ibuffer-do-eval'." (dolist (filtergroup filter-group-alist) (let ((filterset (cdr filtergroup))) (multiple-value-bind (hip-crowd lamers) - (ibuffer-split-list (lambda (bufmark) - (ibuffer-included-in-filters-p (car bufmark) - filterset)) - bmarklist) + (values-list + (ibuffer-split-list (lambda (bufmark) + (ibuffer-included-in-filters-p (car bufmark) + filterset)) + bmarklist)) (aset vec i hip-crowd) (incf i) (setq bmarklist lamers)))) |