[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] master 8dc4626: Avoid 'unused var' 'not left unused var' w
From: |
Tino Calancha |
Subject: |
[Emacs-diffs] master 8dc4626: Avoid 'unused var' 'not left unused var' warnings |
Date: |
Mon, 11 Jul 2016 02:41:23 +0000 (UTC) |
branch: master
commit 8dc4626a0bd13b8d256a9d0c44e321d2c3d702d7
Author: Tino Calancha <address@hidden>
Commit: Tino Calancha <address@hidden>
Avoid 'unused var' 'not left unused var' warnings
* lisp/ibuffer.el (ibuffer-locked-buffer-p): Remove unused var 'char'.
Rename used var '_buffer' to 'cbuffer'.
* lisp/ibuf-ext.el (ibuffer-unmark-all): Rename used var '_mark'
to cmark'.
---
lisp/ibuf-ext.el | 7 +++----
lisp/ibuffer.el | 4 ++--
2 files changed, 5 insertions(+), 6 deletions(-)
diff --git a/lisp/ibuf-ext.el b/lisp/ibuf-ext.el
index 6102e1f..3e4e0dc 100644
--- a/lisp/ibuf-ext.el
+++ b/lisp/ibuf-ext.el
@@ -1504,10 +1504,9 @@ You can then feed the file name(s) to other commands
with \\[yank]."
(defun ibuffer-locked-buffer-p (&optional buf)
"Return non-nil if BUF is locked.
When BUF nil, default to the buffer at current line."
- (let ((_buffer (or buf (ibuffer-current-buffer)))
- char)
- (when _buffer
- (with-current-buffer _buffer
+ (let ((cbuffer (or buf (ibuffer-current-buffer))))
+ (when cbuffer
+ (with-current-buffer cbuffer
(and (boundp 'emacs-lock-mode) emacs-lock-mode)))))
;;;###autoload
diff --git a/lisp/ibuffer.el b/lisp/ibuffer.el
index 37f72bc..8e24629 100644
--- 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
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] master 8dc4626: Avoid 'unused var' 'not left unused var' warnings,
Tino Calancha <=