# HG changeset patch
# User Andreas Schwab <schwab@suse.de>
# Date 909745207 0
# Node ID 26749ef98f6c354db11f724ff6239928717d091a
# Parent  58e75110c08607c24f25190d20186e261e8705f5
(edebug-initial-mode): Fix customize type.
(edebug-on-error): Fix customize type to match that of
debug-on-error.

diff -r 58e75110c086 -r 26749ef98f6c lisp/emacs-lisp/edebug.el
--- a/lisp/emacs-lisp/edebug.el	Fri Oct 30 10:59:23 1998 +0000
+++ b/lisp/emacs-lisp/edebug.el	Fri Oct 30 11:00:07 1998 +0000
@@ -181,7 +181,7 @@
   :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 @@
 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