* lisp/simple.el (eval-expression-print-maximum-character): Use choice type.

https://lists.gnu.org/archive/html/emacs-devel/2019-11/msg00433.html

diff --git a/lisp/simple.el b/lisp/simple.el
index e3ac7094088dc2e61ac78af09ddfeae95f5f10d8..9b4aa235e47f7e325ef798c000d85593c0ae2d97 100644 (file)
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -1561,7 +1561,9 @@ If nil, don't change the value of `debug-on-error'."
 This affects printing by `eval-expression' (via
 `eval-expression-print-format')."
   :group 'lisp
-  :type 'integer
+  :type `(choice (const :tag "ASCII characters" 127)
+                 (const :tag "All characters" ,(max-char))
+                 (integer :tag "Max codepoint to display as character"))
   :version "26.1")
 
 (defun eval-expression-print-format (value)