bug-gnu-emacs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Small patch for cl-indent


From: Peter Seibel
Subject: Small patch for cl-indent
Date: Wed, 11 Aug 2004 10:04:47 -0700
User-agent: Gnus/5.1006 (Gnus v5.10.6) Emacs/21.3 (gnu/linux)

This patch makes cl-indent indent DEFMETHODS with non-standard method
combinations (e.g. PROGN, MIN, MAX) "correctly".

-Peter

--- cl-indent.el~       Wed Aug 15 04:56:38 2001
+++ cl-indent.el        Wed Aug 11 10:03:31 2004
@@ -361,7 +361,7 @@
   (lisp-indent-259 (if (save-excursion (goto-char (elt state 1))
                                       (forward-char 1)
                                       (forward-sexp 2)
-                                      (looking-at "\\s-+:"))
+                                      (looking-at "\\s-+:?\\sw+\\s-+"))
                       '(4 4 (&whole 4 &rest 4) &body)
                     (get 'defun 'common-lisp-indent-function))
                   path state indent-point sexp-column normal-indent))
 

-- 
Peter Seibel                                      peter@javamonkey.com

         Lisp is the red pill. -- John Fraser, comp.lang.lisp




reply via email to

[Prev in Thread] Current Thread [Next in Thread]