procyberian/emacs
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

* lisp/emacs-lisp/package.el (package--remove-hidden): Fix logic

Browse source 
(Bug#20930)
This commit is contained in:
Artur Malabarba 2015-06-30 19:19:30 +01:00
parent 79310d736c
commit 0dfea4562e
1 changed files with 4 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

6
lisp/emacs-lisp/package.el
View file

@ -2596,9 +2596,11 @@ to their archives."
(out))
(while pkg-list
(let ((p (pop pkg-list)))
(if (>= (package-desc-priority p) max-priority)
(let ((priority (package-desc-priority p)))
(if (< priority max-priority)
(setq pkg-list nil)
(push p out)
(setq pkg-list nil))))
(setq max-priority priority)))))
(nreverse out)))
(pkg-list
(list (car pkg-list))))))