Mercurial > emacs

changeset 44501:5fa7b088231f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fix previous change.
author Colin Walters <walters@gnu.org>
date Thu, 11 Apr 2002 18:37:25 +0000
parents a6755c7afe31
children 4067d1e7f884
files lisp/ibuffer.el
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ibuffer.el	Thu Apr 11 13:41:49 2002 +0000
+++ b/lisp/ibuffer.el	Thu Apr 11 18:37:25 2002 +0000
@@ -1679,14 +1679,14 @@
 	     (push (cons buf mark) ibuffer-current-state-list-tmp)))))
     (nreverse ibuffer-current-state-list-tmp)))
 
-(defun ibuffer-current-buffers-with-marks (bufs)
+(defun ibuffer-current-buffers-with-marks (curbufs)
   "Return a list like (BUF . MARK) of all open buffers."
   (let ((bufs (ibuffer-current-state-list)))
     (mapcar #'(lambda (buf) (let ((e (assq buf bufs)))
 			      (if e
 				  e
 				(cons buf ? ))))
-	    bufs)))
+	    curbufs)))
 
 (defun ibuffer-buf-matches-predicates (buf predicates)
   (let ((hit nil)