From 8dc4626a0bd13b8d256a9d0c44e321d2c3d702d7 Mon Sep 17 00:00:00 2001 From: Tino Calancha Date: Mon, 11 Jul 2016 11:30:48 +0900 Subject: 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 +++---- 1 file changed, 3 insertions(+), 4 deletions(-) (limited to 'lisp/ibuf-ext.el') diff --git a/lisp/ibuf-ext.el b/lisp/ibuf-ext.el index 6102e1f7400..3e4e0dcb1b6 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 -- cgit v1.2.1