diff options
| author | Basil L. Contovounesios <contovob@tcd.ie> | 2021-02-15 21:50:38 +0000 |
|---|---|---|
| committer | Basil L. Contovounesios <contovob@tcd.ie> | 2021-02-16 00:07:44 +0000 |
| commit | 2106b12fa751094d1b754b50e6dcad2a19e8f02a (patch) | |
| tree | 16524d953c972d437b95343210d5eee4082c65c9 /lisp | |
| parent | d41a4ad4ae6f25c3cbc90aaaa33781821bb655c5 (diff) | |
| download | emacs-2106b12fa751094d1b754b50e6dcad2a19e8f02a.tar.gz emacs-2106b12fa751094d1b754b50e6dcad2a19e8f02a.tar.bz2 emacs-2106b12fa751094d1b754b50e6dcad2a19e8f02a.zip | |
; Fix last change in simple.el.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/simple.el | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/lisp/simple.el b/lisp/simple.el index 8a9f46cef6c..215f4399f4a 100644 --- a/lisp/simple.el +++ b/lisp/simple.el @@ -1906,14 +1906,14 @@ to get different commands to edit and resubmit." (defcustom read-extended-command-predicate #'completion-default-include-p "Predicate to use to determine which commands to include when completing. -The predicate function is called with two parameter: The +The predicate function is called with two parameters: The symbol (i.e., command) in question that should be included or not, and the current buffer. The predicate should return non-nil if the command should be present when doing `M-x TAB'." :version "28.1" - :type '(choice (const :tag "Exclude commands not relevant to the current mode" - #'completion-default-include-p) - (const :tag "All commands" (lambda (_ _) t)) + :type `(choice (const :tag "Exclude commands not relevant to the current mode" + completion-default-include-p) + (const :tag "All commands" ,(lambda (_s _b) t)) (function :tag "Other function"))) (defun read-extended-command () |