# HG changeset patch # User Gerd Moellmann # Date 987606576 0 # Node ID 3061b65a98979295f5088bd96ea5db93be44dd28 # Parent d63fa36c7facab34356a04dff50941a5ea22db15 (toplevel): Comment out the spec for defmethod. diff -r d63fa36c7fac -r 3061b65a9897 lisp/emacs-lisp/cl-indent.el --- a/lisp/emacs-lisp/cl-indent.el Wed Apr 18 14:27:06 2001 +0000 +++ b/lisp/emacs-lisp/cl-indent.el Wed Apr 18 15:09:36 2001 +0000 @@ -1,6 +1,6 @@ ;;; cl-indent.el --- enhanced lisp-indent mode -;; Copyright (C) 1987 Free Software Foundation, Inc. +;; Copyright (C) 1987, 2000, 2001 Free Software Foundation, Inc. ;; Author: Richard Mlynarik ;; Created: July 1987 @@ -393,7 +393,9 @@ (define-setf-method . defun) (define-setf-expander . defun) (defmacro . defun) (defsubst . defun) (deftype . defun) - (defmethod (4 4 (&whole 4 &rest 1) &body)) + ;; The following indents the first line of the body of a + ;; defmethod wrong. + ;(defmethod (4 4 (&whole 4 &rest 1) &body)) (defpackage (4 2)) (defstruct ((&whole 4 &rest (&whole 2 &rest 1)) &rest (&whole 2 &rest 1)))