Mercurial > emacs
comparison lisp/emacs-lisp/package.el @ 111477:59101ed2e4c6
Minor fix to package-archive-contents recalculation.
lisp/emacs-lisp/package.el (package-read-all-archive-contents): Reset
package-archive-contents to nil before re-reading.
| author | Chong Yidong <cyd@stupidchicken.com> |
|---|---|
| date | Wed, 10 Nov 2010 16:35:06 -0500 |
| parents | 72d2a83a2641 |
| children | b6c07b465755 |
comparison
equal
deleted
inserted
replaced
| 111476:3871ef96f22c | 111477:59101ed2e4c6 |
|---|---|
| 751 (cdr contents)))))) | 751 (cdr contents)))))) |
| 752 | 752 |
| 753 (defun package-read-all-archive-contents () | 753 (defun package-read-all-archive-contents () |
| 754 "Re-read `archive-contents', if it exists. | 754 "Re-read `archive-contents', if it exists. |
| 755 If successful, set `package-archive-contents'." | 755 If successful, set `package-archive-contents'." |
| 756 (setq package-archive-contents nil) | |
| 756 (dolist (archive package-archives) | 757 (dolist (archive package-archives) |
| 757 (package-read-archive-contents (car archive)))) | 758 (package-read-archive-contents (car archive)))) |
| 758 | 759 |
| 759 (defun package-read-archive-contents (archive) | 760 (defun package-read-archive-contents (archive) |
| 760 "Re-read archive contents for ARCHIVE. | 761 "Re-read archive contents for ARCHIVE. |