(condition-case): Fix edebug-form-spec to

allow a handler with a list of condition names.

diff --git a/lisp/emacs-lisp/edebug.el b/lisp/emacs-lisp/edebug.el
index b305cb9a25a59d2a1863a1702a8292cdbd5d4860..442f2cdbf0ce5c2d75770d7e628383babb1d606a 100644 (file)
--- a/lisp/emacs-lisp/edebug.el
+++ b/lisp/emacs-lisp/edebug.el
@@ -1,6 +1,6 @@
 ;;; edebug.el --- a source-level debugger for Emacs Lisp
 
-;; Copyright (C) 1988,'89,'90,'91,'92,'93,'94,'95,'97
+;; Copyright (C) 1988,'89,'90,'91,'92,'93,'94,'95,1997
 ;;       Free Software Foundation, Inc
 
 ;; Author: Daniel LaLiberte <liberte@cs.uiuc.edu>
@@ -2104,7 +2104,7 @@ expressions; a `progn' form will be returned enclosing these forms."
 (def-edebug-spec condition-case
   (symbolp
    form
-   &rest (symbolp body)))
+   &rest ([&or symbolp (&rest symbolp)] body)))
 
 
 (def-edebug-spec \` (backquote-form))