From ce5033129f16b6554b922a63ef0d499ced55a223 Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Wed, 18 Sep 2013 19:28:20 -0700 Subject: Address some "unused lexical argument" warnings in eshell * eshell/em-ls.el (eshell-ls-use-in-dired): Use `symbol' arg. Fix (f)boundp mix-up. * eshell/em-smart.el (eshell-smart-scroll-window) (eshell-disable-after-change): * eshell/em-term.el (eshell-term-sentinel): Mark unused arg. --- lisp/eshell/em-smart.el | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) (limited to 'lisp/eshell/em-smart.el') diff --git a/lisp/eshell/em-smart.el b/lisp/eshell/em-smart.el index e6fa463aec3..8d60444a889 100644 --- a/lisp/eshell/em-smart.el +++ b/lisp/eshell/em-smart.el @@ -194,7 +194,8 @@ The options are `begin', `after' or `end'." (add-hook 'eshell-post-command-hook 'eshell-smart-maybe-jump-to-end nil t)))) -(defun eshell-smart-scroll-window (wind start) +;; This is called by window-scroll-functions with two arguments. +(defun eshell-smart-scroll-window (wind _start) "Scroll the given Eshell window accordingly." (unless eshell-currently-handling-window (let ((inhibit-point-motion-hooks t) @@ -237,7 +238,8 @@ The options are `begin', `after' or `end'." (add-hook 'pre-command-hook 'eshell-smart-display-move nil t) (eshell-refresh-windows)) -(defun eshell-disable-after-change (b e l) +;; Called from after-change-functions with 3 arguments. +(defun eshell-disable-after-change (_b _e _l) "Disable smart display mode if the buffer changes in any way." (when eshell-smart-command-done (remove-hook 'pre-command-hook 'eshell-smart-display-move t) -- cgit v1.2.3