summaryrefslogtreecommitdiff
path: root/lisp/bs.el
diff options
context:
space:
mode:
authorJuanma Barranquero <lekktu@gmail.com>2011-06-02 13:24:12 +0200
committerJuanma Barranquero <lekktu@gmail.com>2011-06-02 13:24:12 +0200
commitb3e945d3a47c5c64d84cb56594ff8c884acb1c37 (patch)
tree492e6b8576b86f6cf8db82dddc6446781244f2d3 /lisp/bs.el
parent910fcf6e00db45289d1257c8fce69739fa870978 (diff)
downloademacs-b3e945d3a47c5c64d84cb56594ff8c884acb1c37.tar.gz
Silence warning for unused `dotimes' counter variables.
* mpc.el (mpc-select-extend, mpc-songpointer-context): * vc/log-view.el (log-view-beginning-of-defun): * vc/smerge-mode.el (smerge-apply-resolution-patch) (smerge-refine-forward, smerge-refine-chopup-region):
Diffstat (limited to 'lisp/bs.el')
-rw-r--r--lisp/bs.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/bs.el b/lisp/bs.el
index 6965af1368c..95dc371e57b 100644
--- a/lisp/bs.el
+++ b/lisp/bs.el
@@ -865,7 +865,7 @@ the status of buffer on current line."
(defun bs--mark-unmark (count fun)
"Call FUN on COUNT consecutive buffers of *buffer-selection*."
(let ((dir (if (> count 0) 1 -1)))
- (dotimes (i (abs count))
+ (dotimes (_i (abs count))
(let ((buffer (bs--current-buffer)))
(when buffer (funcall fun buffer))
(bs--update-current-line)
@@ -976,7 +976,7 @@ Uses function `toggle-read-only'."
(defun bs--nth-wrapper (count fun &rest args)
"Call COUNT times function FUN with arguments ARGS."
- (dotimes (i (or count 1))
+ (dotimes (_i (or count 1))
(apply fun args)))
(defun bs-up (arg)