diff options
| author | Stefan Monnier | 2011-08-01 11:54:09 -0400 |
|---|---|---|
| committer | Stefan Monnier | 2011-08-01 11:54:09 -0400 |
| commit | cca09170ad19eb3c357052550765a2788fabbb40 (patch) | |
| tree | d059799771fcacc611352ee97081ff32c3d91baa | |
| parent | 027b979ca027f82d4730e6548b2a714f71d0da0c (diff) | |
| download | emacs-cca09170ad19eb3c357052550765a2788fabbb40.tar.gz emacs-cca09170ad19eb3c357052550765a2788fabbb40.zip | |
* lisp/emacs-lisp/package.el (package-generate-autoloads): Load autoloads
before binding generated-autoload-file.
| -rw-r--r-- | lisp/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/emacs-lisp/package.el | 2 |
2 files changed, 6 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index ef85ffab8a4..a3699fc999f 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,8 @@ | |||
| 1 | 2011-08-01 Stefan Monnier <monnier@iro.umontreal.ca> | ||
| 2 | |||
| 3 | * emacs-lisp/package.el (package-generate-autoloads): Load autoloads | ||
| 4 | before binding generated-autoload-file. | ||
| 5 | |||
| 1 | 2011-08-01 Deniz Dogan <deniz@dogan.se> | 6 | 2011-08-01 Deniz Dogan <deniz@dogan.se> |
| 2 | 7 | ||
| 3 | * net/rcirc.el (rcirc-handler-333): Clarify docstring. | 8 | * net/rcirc.el (rcirc-handler-333): Clarify docstring. |
diff --git a/lisp/emacs-lisp/package.el b/lisp/emacs-lisp/package.el index e42103a7a01..19e8375966b 100644 --- a/lisp/emacs-lisp/package.el +++ b/lisp/emacs-lisp/package.el | |||
| @@ -570,11 +570,11 @@ EXTRA-PROPERTIES is currently unused." | |||
| 570 | file) | 570 | file) |
| 571 | 571 | ||
| 572 | (defun package-generate-autoloads (name pkg-dir) | 572 | (defun package-generate-autoloads (name pkg-dir) |
| 573 | (require 'autoload) ;Load before we let-bind generated-autoload-file! | ||
| 573 | (let* ((auto-name (concat name "-autoloads.el")) | 574 | (let* ((auto-name (concat name "-autoloads.el")) |
| 574 | (ignore-name (concat name "-pkg.el")) | 575 | (ignore-name (concat name "-pkg.el")) |
| 575 | (generated-autoload-file (expand-file-name auto-name pkg-dir)) | 576 | (generated-autoload-file (expand-file-name auto-name pkg-dir)) |
| 576 | (version-control 'never)) | 577 | (version-control 'never)) |
| 577 | (require 'autoload) | ||
| 578 | (unless (fboundp 'autoload-ensure-default-file) | 578 | (unless (fboundp 'autoload-ensure-default-file) |
| 579 | (package-autoload-ensure-default-file generated-autoload-file)) | 579 | (package-autoload-ensure-default-file generated-autoload-file)) |
| 580 | (update-directory-autoloads pkg-dir))) | 580 | (update-directory-autoloads pkg-dir))) |