From 7ff1b00e83f8027862db9b4067c3596c3b78767c Mon Sep 17 00:00:00 2001 From: Andreas Schwab Date: Fri, 30 Oct 1998 11:00:07 +0000 Subject: [PATCH] (edebug-initial-mode): Fix customize type. (edebug-on-error): Fix customize type to match that of debug-on-error. --- lisp/emacs-lisp/edebug.el | 8 ++++++-- 1 file changed, 6 insertions(+), 2 deletions(-) diff --git a/lisp/emacs-lisp/edebug.el b/lisp/emacs-lisp/edebug.el index ae111e735ba..a1c7b1e3a03 100644 --- a/lisp/emacs-lisp/edebug.el +++ b/lisp/emacs-lisp/edebug.el @@ -181,7 +181,7 @@ Go-nonstop, trace, Trace-fast, continue, and Continue-fast." :type '(choice (const step) (const next) (const go) (const Go-nonstop) (const trace) (const Trace-fast) (const continue) - (const continue-fast)) + (const Continue-fast)) :group 'edebug) (defcustom edebug-trace nil @@ -243,7 +243,11 @@ these errors are signaled from Lisp code whether or not the signal is handled by a `condition-case'. This option is useful for debugging signals that *are* handled since they would otherwise be missed. After execution is resumed, the error is signaled again." - :type '(choice boolean (repeat string)) + :type '(choice (const :tag "off") + (repeat :menu-tag "When" + :value (nil) + (symbol :format "%v")) + (const :tag "always" t)) :group 'edebug) (defcustom edebug-on-quit t -- 2.39.2