diff options
author | Juanma Barranquero <lekktu@gmail.com> | 2011-04-04 11:35:16 +0200 |
---|---|---|
committer | Juanma Barranquero <lekktu@gmail.com> | 2011-04-04 11:35:16 +0200 |
commit | 2fbc1934ae9a9610ef98578d59d478cb642363f9 (patch) | |
tree | 9bb8e2284beddb467fbbaf0d7bbfc213f9c904b6 /lisp/ehelp.el | |
parent | 6a56b5bd08535f8c7097868a23d729223e3d1178 (diff) | |
download | emacs-2fbc1934ae9a9610ef98578d59d478cb642363f9.tar.gz |
Convert some .el files to lexical scoping.
* bs.el (bs-refresh, bs-sort-buffer-interns-are-last)
(bs--get-marked-string, bs--get-modified-string)
(bs--get-readonly-string, bs--get-size-string, bs--get-name)
(bs--get-mode-name, bs--get-file-name): Mark unused arguments.
(bs--configuration-name-for-prefix-arg): Rename argument PREFIX-ARG.
* ehelp.el (electric-help-execute-extended)
(electric-help-ctrl-x-prefix):
* hexl.el (hexl-revert-buffer-function):
* linum.el (linum-after-change, linum-after-scroll):
* emacs-lisp/re-builder.el (reb-auto-update): Mark unused arguments.
* help-fns.el (help-describe-category-set): Remove unused ERR variable.
Diffstat (limited to 'lisp/ehelp.el')
-rw-r--r-- | lisp/ehelp.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/ehelp.el b/lisp/ehelp.el index 7745957b4c3..b2bcf1f85cb 100644 --- a/lisp/ehelp.el +++ b/lisp/ehelp.el @@ -1,4 +1,4 @@ -;;; ehelp.el --- bindings for electric-help mode +;;; ehelp.el --- bindings for electric-help mode -*- lexical-binding: t -*- ;; Copyright (C) 1986, 1995, 2000-2011 Free Software Foundation, Inc. @@ -347,14 +347,14 @@ will select it.)" ;; This is to be bound to M-x in ehelp mode. Retains ehelp buffer and then ;; continues with execute-extended-command. -(defun electric-help-execute-extended (prefixarg) +(defun electric-help-execute-extended (_prefixarg) (interactive "p") (setq electric-help-form-to-execute '(execute-extended-command nil)) (electric-help-retain)) ;; This is to be buond to C-x in ehelp mode. Retains ehelp buffer and then ;; continues with ctrl-x prefix. -(defun electric-help-ctrl-x-prefix (prefixarg) +(defun electric-help-ctrl-x-prefix (_prefixarg) (interactive "p") (setq electric-help-form-to-execute '(progn (message nil) (setq unread-command-char ?\C-x))) (electric-help-retain)) |