aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorGerd Moellmann2001-04-18 15:09:36 +0000
committerGerd Moellmann2001-04-18 15:09:36 +0000
commit6f26dfa51fa6a9308fbfc815e8bd1742180b8bc3 (patch)
tree5abc3297b22948d2adcb30bc1ac5131543319765
parentc825bc6665e5e7705e3018ecdf57b762a4b1ebd1 (diff)
downloademacs-6f26dfa51fa6a9308fbfc815e8bd1742180b8bc3.tar.gz
emacs-6f26dfa51fa6a9308fbfc815e8bd1742180b8bc3.zip
(toplevel): Comment out the spec
for defmethod.
-rw-r--r--lisp/emacs-lisp/cl-indent.el6
1 files changed, 4 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/cl-indent.el b/lisp/emacs-lisp/cl-indent.el
index 359288ebf05..e0357cd5997 100644
--- a/lisp/emacs-lisp/cl-indent.el
+++ b/lisp/emacs-lisp/cl-indent.el
@@ -1,6 +1,6 @@
1;;; cl-indent.el --- enhanced lisp-indent mode 1;;; cl-indent.el --- enhanced lisp-indent mode
2 2
3;; Copyright (C) 1987 Free Software Foundation, Inc. 3;; Copyright (C) 1987, 2000, 2001 Free Software Foundation, Inc.
4 4
5;; Author: Richard Mlynarik <mly@eddie.mit.edu> 5;; Author: Richard Mlynarik <mly@eddie.mit.edu>
6;; Created: July 1987 6;; Created: July 1987
@@ -393,7 +393,9 @@ by `lisp-body-indent'."
393 (define-setf-method . defun) 393 (define-setf-method . defun)
394 (define-setf-expander . defun) 394 (define-setf-expander . defun)
395 (defmacro . defun) (defsubst . defun) (deftype . defun) 395 (defmacro . defun) (defsubst . defun) (deftype . defun)
396 (defmethod (4 4 (&whole 4 &rest 1) &body)) 396 ;; The following indents the first line of the body of a
397 ;; defmethod wrong.
398 ;(defmethod (4 4 (&whole 4 &rest 1) &body))
397 (defpackage (4 2)) 399 (defpackage (4 2))
398 (defstruct ((&whole 4 &rest (&whole 2 &rest 1)) 400 (defstruct ((&whole 4 &rest (&whole 2 &rest 1))
399 &rest (&whole 2 &rest 1))) 401 &rest (&whole 2 &rest 1)))