Indent `handler-case' correctly.

This commit is contained in:
Richard M. Stallman 1998-07-10 03:20:14 +00:00
parent 3fd00dcb42
commit f8f34fa23d

View file

@ -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