# HG changeset patch
# User Chong Yidong <cyd@stupidchicken.com>
# Date 1289424906 18000
# Node ID 59101ed2e4c61006ec915bc3754aeb65afe85ce9
# Parent  3871ef96f22c29d267db3f3e9865ea1ab74510ff
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.

diff -r 3871ef96f22c -r 59101ed2e4c6 lisp/ChangeLog
--- a/lisp/ChangeLog	Wed Nov 10 18:25:13 2010 +0100
+++ b/lisp/ChangeLog	Wed Nov 10 16:35:06 2010 -0500
@@ -1,3 +1,8 @@
+2010-11-10  Chong Yidong  <cyd@stupidchicken.com>
+
+	* emacs-lisp/package.el (package-read-all-archive-contents): Reset
+	package-archive-contents to nil before re-reading.
+
 2010-11-10  Brandon Craig Rhodes <brandon@rhodesmill.org>
 
 	* textmodes/flyspell.el (flyspell-word): Do not re-check words
diff -r 3871ef96f22c -r 59101ed2e4c6 lisp/emacs-lisp/package.el
--- a/lisp/emacs-lisp/package.el	Wed Nov 10 18:25:13 2010 +0100
+++ b/lisp/emacs-lisp/package.el	Wed Nov 10 16:35:06 2010 -0500
@@ -753,6 +753,7 @@
 (defun package-read-all-archive-contents ()
   "Re-read `archive-contents', if it exists.
 If successful, set `package-archive-contents'."
+  (setq package-archive-contents nil)
   (dolist (archive package-archives)
     (package-read-archive-contents (car archive))))