From 70621e25713b8158cc386a70247f63106df3712c Mon Sep 17 00:00:00 2001
From: Noam Postavsky <npostavs@gmail.com>
Date: Wed, 1 Nov 2017 08:51:35 -0400
Subject: [PATCH] Fix customization of debugger-print-function (Bug#29077)

* lisp/emacs-lisp/debug.el (debugger-print-function): The :options
keyword has no effect for :type 'function, use :type '(choice ...)
instead.
---
 lisp/emacs-lisp/debug.el | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/lisp/emacs-lisp/debug.el b/lisp/emacs-lisp/debug.el
index 6c754615b00..e1b87b5c6e2 100644
--- a/lisp/emacs-lisp/debug.el
+++ b/lisp/emacs-lisp/debug.el
@@ -51,8 +51,9 @@ the middle is discarded, and just the beginning and end are displayed."
 
 (defcustom debugger-print-function #'cl-prin1
   "Function used to print values in the debugger backtraces."
-  :type 'function
-  :options '(cl-prin1 prin1)
+  :type '(choice (const cl-prin1)
+                 (const prin1)
+                 function)
   :version "26.1")
 
 (defcustom debugger-bury-or-kill 'bury
-- 
2.39.2