From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Mon, 24 Oct 2005 16:10:42 +0000 (+0000)
Subject: (macro-declaration-function): Add a `doc-string' declaration.
X-Git-Tag: emacs-pretest-22.0.90~6332
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=38729cfb2ab9de5e65cb9d705ac3148edc46da42;p=emacs.git

(macro-declaration-function): Add a `doc-string' declaration.
---

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))))))