(toplevel): indent the :method sub-form of `defgeneric' correctly.

2001-05-16 21:13:21 +00:00 · 2001-05-16 21:13:21 +00:00 · 2180ea97a8
commit 2180ea97a8
parent 09393d0728
2 changed files with 6 additions and 0 deletions
--- a/lisp/emacs-lisp/cl-indent.el
+++ b/lisp/emacs-lisp/cl-indent.el
@ -422,6 +422,7 @@ by `lisp-body-indent'."
           (handler-bind . let) (restart-bind . let)
           (locally 1)
           ;(loop ...)
+           (:method (&lambda &body)) ; in `defgeneric'
           (multiple-value-bind ((&whole 6 &rest 1) 4 &body))
           (multiple-value-call (4 &body))
           (multiple-value-prog1 1)