mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-02 11:21:42 +00:00
Code Issues Releases Activity

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

Browse Source 
Fix void variable due to `found-something' being in the wrong `let'.
This commit is contained in:
Artur Malabarba 2015-07-07 14:59:47 +01:00
parent 6aa1d7635c
commit 1ffd9abcd7
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/emacs-lisp/package.el
View File

@ -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