* emacs-lisp/bytecomp.el (byte-compile-output-file-form): Handle defvaralias.

* make-docfile.c (scan_lisp_file): Also look for `defvaralias'.

2 files changed, 5 insertions, 1 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 194fdfdd915..a5e762d0210 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -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).
diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el
index 3f330703d51..e527d07029a 100644
--- a/lisp/emacs-lisp/bytecomp.el
+++ b/lisp/emacs-lisp/bytecomp.el
@@ -2077,7 +2077,7 @@ and will be removed soon.  See (elisp)Backquote in the manual."))
   ;; 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