diff options
| author | Juanma Barranquero <lekktu@gmail.com> | 2011-04-19 15:44:55 +0200 |
|---|---|---|
| committer | Juanma Barranquero <lekktu@gmail.com> | 2011-04-19 15:44:55 +0200 |
| commit | 06b605171f1c9d8b42bd3326a243b8b03d2e4e58 (patch) | |
| tree | e96c135042999136bf0e75d113aae306e51983e3 /lisp/xt-mouse.el | |
| parent | 04c569546ad52f6270d8fc6d4aa0750950a0ac05 (diff) | |
| download | emacs-06b605171f1c9d8b42bd3326a243b8b03d2e4e58.tar.gz | |
lisp/*.el: Lexical-binding cleanup.
Diffstat (limited to 'lisp/xt-mouse.el')
| -rw-r--r-- | lisp/xt-mouse.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/xt-mouse.el b/lisp/xt-mouse.el index 66542578d76..403aa5d158b 100644 --- a/lisp/xt-mouse.el +++ b/lisp/xt-mouse.el @@ -50,7 +50,7 @@ M-down-mouse-1 M-down-mouse-2 M-down-mouse-3)) (put event-type 'event-kind 'mouse-click)) -(defun xterm-mouse-translate (event) +(defun xterm-mouse-translate (_event) "Read a click and release event from XTerm." (save-excursion (save-window-excursion @@ -228,7 +228,7 @@ down the SHIFT key while pressing the mouse button." (dolist (terminal (terminal-list)) (turn-on-xterm-mouse-tracking-on-terminal terminal))) -(defun turn-off-xterm-mouse-tracking (&optional force) +(defun turn-off-xterm-mouse-tracking (&optional _force) "Disable Emacs mouse tracking in xterm." (dolist (terminal (terminal-list)) (turn-off-xterm-mouse-tracking-on-terminal terminal))) |