Mercurial > emacs
comparison lisp/emacs-lisp/cl-indent.el @ 56736:3b66605ad268
(lisp-indent-defmethod): Correct
indentation of DEFMETHODS with non-standard method
combinations (e.g., PROGN, MIN, MAX).
author | Eli Zaretskii <eliz@gnu.org> |
---|---|
date | Sat, 21 Aug 2004 12:24:13 +0000 |
parents | c2f8040b4ece |
children | d07b7088d847 d8411455de48 |
comparison
equal
deleted
inserted
replaced
56735:d6c81d81255e | 56736:3b66605ad268 |
---|---|
456 (null (cdr path)) | 456 (null (cdr path)) |
457 (save-excursion (goto-char (elt state 1)) | 457 (save-excursion (goto-char (elt state 1)) |
458 (forward-char 1) | 458 (forward-char 1) |
459 (forward-sexp 3) | 459 (forward-sexp 3) |
460 (backward-sexp) | 460 (backward-sexp) |
461 (looking-at ":"))) | 461 (looking-at ":\\|\\sw+"))) |
462 '(4 4 (&whole 4 &rest 4) &body) | 462 '(4 4 (&whole 4 &rest 4) &body) |
463 (get 'defun 'common-lisp-indent-function)) | 463 (get 'defun 'common-lisp-indent-function)) |
464 path state indent-point sexp-column normal-indent)) | 464 path state indent-point sexp-column normal-indent)) |
465 | 465 |
466 | 466 |