# HG changeset patch # User Dave Love # Date 951220345 0 # Node ID 3cb58ebdc2fa69044511a6b76a466cc526879109 # Parent 1f07581a92ea2266f15fe0e33a6c45652919beba Remove bogus spec for define-condition. diff -r 1f07581a92ea -r 3cb58ebdc2fa lisp/emacs-lisp/cl-indent.el --- a/lisp/emacs-lisp/cl-indent.el Tue Feb 22 10:27:05 2000 +0000 +++ b/lisp/emacs-lisp/cl-indent.el Tue Feb 22 11:52:25 2000 +0000 @@ -377,6 +377,7 @@ (let ((l '((block 1) (case (4 &rest (&whole 2 &rest 1))) (ccase . case) (ecase . case) + (condition-case ((1 4) (&whole 2 ((0 1) (1 3) (2 &body))))) (typecase . case) (etypecase . case) (ctypecase . case) (catch 1) (cond (&rest (&whole 2 &rest 1))) @@ -386,10 +387,6 @@ (defconstant . defvar) (defcustom (4 2 2 2)) (defparameter . defvar) - (define-condition ((1 6) - (2 6 ((&whole 1))) - (3 4 ((&whole 1))) - (4 &body))) (define-modify-macro (4 &body)) (defsetf (4 &lambda 4 &body))