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/hexl.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/hexl.el')
| -rw-r--r-- | lisp/hexl.el | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/lisp/hexl.el b/lisp/hexl.el index dd142f7cda4..fdafd97cdab 100644 --- a/lisp/hexl.el +++ b/lisp/hexl.el @@ -1,4 +1,4 @@ -;;; hexl.el --- edit a file in a hex dump format using the hexl filter +;;; hexl.el --- edit a file in a hex dump format using the hexl filter -*- lexical-binding: t -*- ;; Copyright (C) 1989, 1994, 1998, 2001-2011 Free Software Foundation, Inc. @@ -355,7 +355,7 @@ You can use \\[hexl-find-file] to visit a file in Hexl mode. (hexl-mode--setq-local 'require-final-newline nil) - + (hexl-mode--setq-local 'font-lock-defaults '(hexl-font-lock-keywords t)) (hexl-mode--setq-local 'revert-buffer-function @@ -437,7 +437,7 @@ and edit the file in `hexl-mode'." (if (not (eq major-mode 'hexl-mode)) (hexl-mode))) -(defun hexl-revert-buffer-function (ignore-auto noconfirm) +(defun hexl-revert-buffer-function (_ignore-auto _noconfirm) (let ((coding-system-for-read 'no-conversion) revert-buffer-function) ;; Call the original `revert-buffer' without code conversion; also @@ -492,7 +492,7 @@ With arg, don't unhexlify buffer." ;; since some of them may affect the minor modes. (dolist (mm mms) (funcall (car mm) (if (cdr mm) 1 -1)))) - + (force-mode-line-update)) (defun hexl-maybe-dehexlify-buffer () |