From 2c3b05c93e4884460068a12357ebd04ae4cd7446 Mon Sep 17 00:00:00 2001 From: Oleh Krehel Date: Tue, 27 Jan 2015 10:48:40 +0100 Subject: [PATCH] lisp/emacs-lisp/derived.el (define-derived-mode): Declare indent 3. Now, e.g. `indent-sexp' will produce: (define-derived-mode outline-mode text-mode "Outline" "Set ...") instead of: (define-derived-mode outline-mode text-mode "Outline" "Set ...") --- lisp/ChangeLog | 4 ++++ lisp/emacs-lisp/derived.el | 3 ++- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 16cb21dd5c5..2b02373fbe1 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2015-01-27 Oleh Krehel + + * emacs-lisp/derived.el (define-derived-mode): Declare indent 3. + 2015-01-27 Katsumi Yamaoka * emacs-lisp/cl.el (cl--function-convert): Run cl--labels-convert diff --git a/lisp/emacs-lisp/derived.el b/lisp/emacs-lisp/derived.el index a250ea60d21..52da4c99eaf 100644 --- a/lisp/emacs-lisp/derived.el +++ b/lisp/emacs-lisp/derived.el @@ -162,7 +162,8 @@ The new mode runs the hook constructed by the function See Info node `(elisp)Derived Modes' for more details." (declare (debug (&define name symbolp sexp [&optional stringp] [&rest keywordp sexp] def-body)) - (doc-string 4)) + (doc-string 4) + (indent 3)) (when (and docstring (not (stringp docstring))) ;; Some trickiness, since what appears to be the docstring may really be -- 2.39.2