Avoid 'unused var' 'not left unused var' warnings

[gnu-emacs] / lisp / ibuffer.el

diff --git a/lisp/ibuffer.el b/lisp/ibuffer.el
index 37f72bc1aaac1203c11611870371f71b1dadba28..8e246297ff760601a5c0d151833e3261d7801f7c 100644 (file)
--- a/lisp/ibuffer.el
+++ b/lisp/ibuffer.el
@@ -1348,8 +1348,8 @@ With optional ARG, make read-only only if ARG is not negative."
         t)))
      ((not (char-equal mark ?\r))
       (ibuffer-map-lines
-       (lambda (_buf _mark)
-        (when (char-equal _mark mark)
+       (lambda (_buf cmark)
+        (when (char-equal cmark mark)
           (ibuffer-set-mark-1 ?\s))
         t)))
      (t