(edebug-initial-mode): Fix customize type.

(edebug-on-error): Fix customize type to match that of
debug-on-error.

diff --git a/lisp/emacs-lisp/edebug.el b/lisp/emacs-lisp/edebug.el
index ae111e735baf8661778b196ec8fca531be810b18..a1c7b1e3a03293cdcf0797c1c72df875c186b286 100644 (file)
--- 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