From: Eli Zaretskii <eliz@gnu.org>
Date: Sat, 21 Aug 2004 12:24:13 +0000 (+0000)
Subject: (lisp-indent-defmethod): Correct
X-Git-Tag: ttn-vms-21-2-B4~5226
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=3166fce661d1e6881cb50c93549b97e579888aa4;p=emacs.git

(lisp-indent-defmethod): Correct
indentation of DEFMETHODS with non-standard method
combinations (e.g., PROGN, MIN, MAX).
---

diff --git a/lisp/emacs-lisp/cl-indent.el b/lisp/emacs-lisp/cl-indent.el
index c5e13a4c00f..a203155673c 100644
--- a/lisp/emacs-lisp/cl-indent.el
+++ b/lisp/emacs-lisp/cl-indent.el
@@ -458,7 +458,7 @@ If nil, indent backquoted lists as data, i.e., like quoted lists."
 					    (forward-char 1)
                                             (forward-sexp 3)
                                             (backward-sexp)
-					    (looking-at ":")))
+					    (looking-at ":\\|\\sw+")))
 		       '(4 4 (&whole 4 &rest 4) &body)
 		     (get 'defun 'common-lisp-indent-function))
 		   path state indent-point sexp-column normal-indent))