* lisp/emacs-lisp/package.el (package-compute-transaction): Bug fix

Fix void variable due to `found-something' being in the wrong `let'.

diff --git a/lisp/emacs-lisp/package.el b/lisp/emacs-lisp/package.el
index 35473334baf8b80335df4bfbd9bf0a064b50363a..c256923ca2101402c421baef50857fd7eec5f5db 100644 (file)
--- a/lisp/emacs-lisp/package.el
+++ b/lisp/emacs-lisp/package.el
@@ -1572,12 +1572,12 @@ SEEN is used internally to detect infinite recursion."
         ;; blocked via `package-load-list'.
         (let ((pkg-descs (cdr (assq next-pkg package-archive-contents)))
               (found nil)
+              (found-something nil)
               (problem nil))
           (while (and pkg-descs (not found))
             (let* ((pkg-desc (pop pkg-descs))
                    (version (package-desc-version pkg-desc))
-                   (disabled (package-disabled-p next-pkg version))
-                   found-something)
+                   (disabled (package-disabled-p next-pkg version)))
               (cond
                ((version-list-< version next-version)
                 ;; pkg-descs is sorted by priority, not version, so