Mercurial > emacs
changeset 105852:69c90cb0d1e3
* emacs-lisp/bytecomp.el (byte-compile-output-file-form): Handle defvaralias.
* make-docfile.c (scan_lisp_file): Also look for `defvaralias'.
| author | Dan Nicolaescu <dann@ics.uci.edu> |
|---|---|
| date | Wed, 04 Nov 2009 06:15:41 +0000 |
| parents | b7557958fa7d |
| children | ee32178b694f |
| files | lib-src/ChangeLog lib-src/make-docfile.c lisp/ChangeLog lisp/emacs-lisp/bytecomp.el |
| diffstat | 4 files changed, 12 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lib-src/ChangeLog Wed Nov 04 04:33:25 2009 +0000 +++ b/lib-src/ChangeLog Wed Nov 04 06:15:41 2009 +0000 @@ -1,3 +1,7 @@ +2009-11-04 Dan Nicolaescu <dann@ics.uci.edu> + + * make-docfile.c (scan_lisp_file): Also look for `defvaralias'. + 2009-10-15 Juanma Barranquero <lekktu@gmail.com> * .gitignore: Add echolisp.tmp.
--- a/lib-src/make-docfile.c Wed Nov 04 04:33:25 2009 +0000 +++ b/lib-src/make-docfile.c Wed Nov 04 06:15:41 2009 +0000 @@ -1007,7 +1007,9 @@ } } - else if (! strcmp (buffer, "custom-declare-variable")) + else if (! strcmp (buffer, "custom-declare-variable") + || ! strcmp (buffer, "defvaralias") + ) { char c1 = 0, c2 = 0; type = 'V';
--- a/lisp/ChangeLog Wed Nov 04 04:33:25 2009 +0000 +++ b/lisp/ChangeLog Wed Nov 04 06:15:41 2009 +0000 @@ -1,3 +1,7 @@ +2009-11-03 Dan Nicolaescu <dann@ics.uci.edu> + + * emacs-lisp/bytecomp.el (byte-compile-output-file-form): Handle defvaralias. + 2009-11-04 Stefan Monnier <monnier@iro.umontreal.ca> * descr-text.el: Require help-mode rather than help-fns (bug#4861).
--- a/lisp/emacs-lisp/bytecomp.el Wed Nov 04 04:33:25 2009 +0000 +++ b/lisp/emacs-lisp/bytecomp.el Wed Nov 04 06:15:41 2009 +0000 @@ -2077,7 +2077,7 @@ ;; defalias calls are output directly by byte-compile-file-form-defmumble; ;; it does not pay to first build the defalias in defmumble and then parse ;; it here. - (if (and (memq (car-safe form) '(defun defmacro defvar defconst autoload + (if (and (memq (car-safe form) '(defun defmacro defvar defvaralias defconst autoload custom-declare-variable)) (stringp (nth 3 form))) (byte-compile-output-docform nil nil '("\n(" 3 ")") form nil