From: Richard M. Stallman <rms@gnu.org>
Date: Sat, 12 Jul 1997 06:13:54 +0000 (+0000)
Subject: (condition-case): Fix edebug-form-spec to
X-Git-Tag: emacs-20.1~1217
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=284795f8719f9deaf18d43477b68e4617ba549bb;p=emacs.git

(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 b305cb9a25a..442f2cdbf0c 100644
--- 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))