From e4a62f8662b01ad1700565149ba7acbb67a2681a Mon Sep 17 00:00:00 2001
From: Juri Linkov <juri@linkov.net>
Date: Sun, 17 Nov 2019 00:10:19 +0200
Subject: [PATCH] * lisp/simple.el (eval-expression-print-maximum-character):
 Use choice type.

https://lists.gnu.org/archive/html/emacs-devel/2019-11/msg00433.html
---
 lisp/simple.el | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/lisp/simple.el b/lisp/simple.el
index e3ac7094088..9b4aa235e47 100644
--- 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)
-- 
2.39.5