1 files changed, 2 insertions, 2 deletions

diff --git a/lisp/ibuffer.el b/lisp/ibuffer.el
index 79aa6d47986..b936bb15afe 100644
--- a/lisp/ibuffer.el
+++ b/lisp/ibuffer.el
@@ -1679,14 +1679,14 @@ If optional argument INCLUDE-LINES is non-nil, return a list like
              (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)