X-Git-Url: http://git.chise.org/gitweb/?p=chise%2Fxemacs-chise.git.1;a=blobdiff_plain;f=lisp%2Fautoload.el;h=965d5500fd70758c854e0e56e5aa236b73f46452;hp=b9b0a605aa42af471a1760481eb5e4bf8f608c8b;hb=762383636a99307282c2d93d26c35c046ec24da1;hpb=e31bfd1501359ce20fe1caf6b913a019318ec83c

diff --git a/lisp/autoload.el b/lisp/autoload.el
index b9b0a60..965d550 100644
--- a/lisp/autoload.el
+++ b/lisp/autoload.el
@@ -87,6 +87,8 @@ the section of autoloads for a file.")
 (defvar generate-autoload-section-trailer "\n;;;***\n"
   "String which indicates the end of the section of autoloads for a file.")
 
+(defvar autoload-package-name nil)
+
 ;;; Forms which have doc-strings which should be printed specially.
 ;;; A doc-string-elt property of ELT says that (nth ELT FORM) is
 ;;; the doc-string in FORM.
@@ -540,8 +542,6 @@ on the command line."
 	  (goto-char (point-max))
 	  (insert "\n(provide '" sym ")\n")))))
 
-(defvar autoload-package-name nil)
-
 ;; #### this function is almost identical, but subtly different,
 ;; from batch-update-autoloads.  Steve, it's your responsibility to
 ;; clean this up.  The two should be merged, but I'm not sure what