master 2106b12: ; Fix last change in simple.el.

[Basil L. Contovounesios]

branch: master
commit 2106b12fa751094d1b754b50e6dcad2a19e8f02a
Author: Basil L. Contovounesios <contovob@tcd.ie>
Commit: Basil L. Contovounesios <contovob@tcd.ie>

    ; Fix last change in simple.el.
---
 lisp/simple.el | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/lisp/simple.el b/lisp/simple.el
index 8a9f46c..215f439 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 ()