diff options
| author | John Paul Wallington <jpw@pobox.com> | 2008-06-08 21:46:14 +0000 |
|---|---|---|
| committer | John Paul Wallington <jpw@pobox.com> | 2008-06-08 21:46:14 +0000 |
| commit | 8f2464a19f82cc70c1042576d1525be3bac2a60e (patch) | |
| tree | 607373d189228a6b056d0bd91a92ac6dd4e4e1d6 /lisp/mh-e | |
| parent | ef9e658b0863fce75920e8cdcb3d71577cd8d169 (diff) | |
| download | emacs-8f2464a19f82cc70c1042576d1525be3bac2a60e.tar.gz | |
(toplevel): Put `doc-string-elt' properties on `defun-mh'
and `defmacro-mh'.
Diffstat (limited to 'lisp/mh-e')
| -rw-r--r-- | lisp/mh-e/mh-acros.el | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/mh-e/mh-acros.el b/lisp/mh-e/mh-acros.el index 2ab1d9e3f0b..d4fd2cccb3b 100644 --- a/lisp/mh-e/mh-acros.el +++ b/lisp/mh-e/mh-acros.el @@ -91,6 +91,7 @@ Otherwise, create function NAME with ARG-LIST and BODY." `(defalias ',name ',function) `(defun ,name ,arg-list ,@body)))) (put 'defun-mh 'lisp-indent-function 'defun) +(put 'defun-mh 'doc-string-elt 4) ;;;###mh-autoload (defmacro defmacro-mh (name macro arg-list &rest body) @@ -102,6 +103,7 @@ Otherwise, create macro NAME with ARG-LIST and BODY." `(defalias ',name ',macro) `(defmacro ,name ,arg-list ,@body)))) (put 'defmacro-mh 'lisp-indent-function 'defun) +(put 'defmacro-mh 'doc-string-elt 4) |