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/recentf.el | |
parent | 04c569546ad52f6270d8fc6d4aa0750950a0ac05 (diff) | |
download | emacs-06b605171f1c9d8b42bd3326a243b8b03d2e4e58.tar.gz |
lisp/*.el: Lexical-binding cleanup.
Diffstat (limited to 'lisp/recentf.el')
-rw-r--r-- | lisp/recentf.el | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/lisp/recentf.el b/lisp/recentf.el index 9f9baad8dbd..fc9b7881733 100644 --- a/lisp/recentf.el +++ b/lisp/recentf.el @@ -590,7 +590,7 @@ menu-elements (no sub-menu)." ;; Count the number of assigned menu shortcuts. (defvar recentf-menu-shortcuts) -(defun recentf-make-menu-items (&optional menu) +(defun recentf-make-menu-items (&optional _menu) "Make menu items from the recent list. This is a menu filter function which ignores the MENU argument." (setq recentf-menu-filter-commands nil) @@ -1036,7 +1036,7 @@ That is, remove a non kept file from the recent list." ;;; Common dialog stuff ;; -(defun recentf-cancel-dialog (&rest ignore) +(defun recentf-cancel-dialog (&rest _ignore) "Cancel the current dialog. IGNORE arguments." (interactive) @@ -1092,7 +1092,7 @@ Go to the beginning of buffer if not found." ;; (defvar recentf-edit-list nil) -(defun recentf-edit-list-select (widget &rest ignore) +(defun recentf-edit-list-select (widget &rest _ignore) "Toggle a file selection based on the checkbox WIDGET state. IGNORE other arguments." (let ((value (widget-get widget :tag)) @@ -1102,7 +1102,7 @@ IGNORE other arguments." (setq recentf-edit-list (delq value recentf-edit-list))) (message "%s %sselected" value (if check "" "un")))) -(defun recentf-edit-list-validate (&rest ignore) +(defun recentf-edit-list-validate (&rest _ignore) "Process the recent list when the edit list dialog is committed. IGNORE arguments." (if recentf-edit-list @@ -1146,7 +1146,7 @@ Click on Cancel or type `q' to cancel.\n") ;;; Open file dialog ;; -(defun recentf-open-files-action (widget &rest ignore) +(defun recentf-open-files-action (widget &rest _ignore) "Open the file stored in WIDGET's value when notified. IGNORE other arguments." (kill-buffer (current-buffer)) |