diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2005-10-24 16:10:42 +0000 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2005-10-24 16:10:42 +0000 |
| commit | 38729cfb2ab9de5e65cb9d705ac3148edc46da42 (patch) | |
| tree | f6330c21360311812355d9101bb15ffd20177e74 /lisp/emacs-lisp | |
| parent | 0a3fde9d0ec1674b76917448ede1e405b63ce8cd (diff) | |
| download | emacs-38729cfb2ab9de5e65cb9d705ac3148edc46da42.tar.gz emacs-38729cfb2ab9de5e65cb9d705ac3148edc46da42.tar.bz2 emacs-38729cfb2ab9de5e65cb9d705ac3148edc46da42.zip | |
(macro-declaration-function): Add a `doc-string' declaration.
Diffstat (limited to 'lisp/emacs-lisp')
| -rw-r--r-- | lisp/emacs-lisp/byte-run.el | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/emacs-lisp/byte-run.el b/lisp/emacs-lisp/byte-run.el index c31036f02ed..453bef5ecbb 100644 --- a/lisp/emacs-lisp/byte-run.el +++ b/lisp/emacs-lisp/byte-run.el @@ -50,6 +50,8 @@ The return value of this function is not used." (put macro 'lisp-indent-function (car (cdr d)))) ((and (consp d) (eq (car d) 'debug)) (put macro 'edebug-form-spec (car (cdr d)))) + ((and (consp d) (eq (car d) 'doc-string)) + (put macro 'doc-string-elt (car (cdr d)))) (t (message "Unknown declaration %s" d)))))) |