From: Richard M. Stallman Date: Fri, 10 Jul 1998 03:20:14 +0000 (+0000) Subject: Indent `handler-case' correctly. X-Git-Tag: emacs-20.3~348 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=f8f34fa23d98857a12027159bb5558a7e15ef14e;p=emacs.git Indent `handler-case' correctly. --- diff --git a/lisp/emacs-lisp/cl-indent.el b/lisp/emacs-lisp/cl-indent.el index 4bcc7111f0d..dd5586dbd21 100644 --- a/lisp/emacs-lisp/cl-indent.el +++ b/lisp/emacs-lisp/cl-indent.el @@ -402,6 +402,7 @@ by `lisp-body-indent'." (eval-when 1) (flet ((&whole 4 &rest (&whole 1 (&whole 4 &rest 1) &body)) &body)) + (handler-case (4 &rest (&whole 2 (&whole 4 &rest 1) &body))) (labels . flet) (macrolet . flet) ;; `else-body' style