Mercurial > emacs
changeset 27753:343886f78d1a
(lisp-indent-259): Indentation fix.
author | Gerd Moellmann <gerd@gnu.org> |
---|---|
date | Thu, 17 Feb 2000 20:43:34 +0000 |
parents | 7ee8155d48c5 |
children | 0d8de7862e51 |
files | lisp/emacs-lisp/cl-indent.el |
diffstat | 1 files changed, 5 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/emacs-lisp/cl-indent.el Thu Feb 17 20:04:15 2000 +0000 +++ b/lisp/emacs-lisp/cl-indent.el Thu Feb 17 20:43:34 2000 +0000 @@ -241,15 +241,16 @@ (setq tem (car method)) (or (eq tem 'nil) ;default indentation - (eq tem '&lambda) ;lambda list + (eq tem '&lambda) ;lambda list (and (eq tem '&body) (null (cdr method))) (and (eq tem '&rest) - (consp (cdr method)) (null (cddr method))) + (consp (cdr method)) + (null (cddr method))) (integerp tem) ;explicit indentation specified (and (consp tem) ;destructuring (eq (car tem) '&whole) - (or (symbolp (cadr tem)) - (integerp (cadr tem)))) + (or (symbolp (cadr tem)) + (integerp (cadr tem)))) (and (symbolp tem) ;a function to call to do the work. (null (cdr method))) (lisp-indent-report-bad-format method))