diff options
| author | Gerd Moellmann <gerd@gnu.org> | 2000-02-17 20:45:37 +0000 |
|---|---|---|
| committer | Gerd Moellmann <gerd@gnu.org> | 2000-02-17 20:45:37 +0000 |
| commit | 3c0ed7cec3830e853fcd1bfe15198107356d0e0b (patch) | |
| tree | bb5f848cb3466e388ef6c624fc78cb5decc0cc79 /lisp/emacs-lisp | |
| parent | 3b3cc4a4899022e6f12bd9cfdbb854111f8443e6 (diff) | |
| download | emacs-3c0ed7cec3830e853fcd1bfe15198107356d0e0b.tar.gz | |
(lisp-indent-259): Indentation fix.
Diffstat (limited to 'lisp/emacs-lisp')
| -rw-r--r-- | lisp/emacs-lisp/cl-indent.el | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/lisp/emacs-lisp/cl-indent.el b/lisp/emacs-lisp/cl-indent.el index 11416ae532e..2b5ef3420c4 100644 --- a/lisp/emacs-lisp/cl-indent.el +++ b/lisp/emacs-lisp/cl-indent.el @@ -241,15 +241,16 @@ by `lisp-body-indent'." (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)) |