emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/helm dc745dd553 2/2: Fix loop in helm-package--upgradeable


From: ELPA Syncer
Subject: [nongnu] elpa/helm dc745dd553 2/2: Fix loop in helm-package--upgradeable-packages
Date: Tue, 13 Aug 2024 04:01:04 -0400 (EDT)

branch: elpa/helm
commit dc745dd55362471115f919bebc554f5c26da85f2
Author: Thierry Volpiatto <thievol@posteo.net>
Commit: Thierry Volpiatto <thievol@posteo.net>

    Fix loop in helm-package--upgradeable-packages
---
 helm-packages.el | 7 +++----
 1 file changed, 3 insertions(+), 4 deletions(-)

diff --git a/helm-packages.el b/helm-packages.el
index 196a7312b4..450e24b4ae 100644
--- a/helm-packages.el
+++ b/helm-packages.el
@@ -281,10 +281,9 @@ Arg PACKAGES is a list of strings."
                                                           (cons sym vec))))))
                 package-alist))) 
     (cl-loop for (sym desc) in pkgs
-             for available = (helm-aif (assq sym package-archive-contents)
-                                 (and (not (package-disabled-p sym cversion))
-                                      it))
-             for cversion = (and available (package-desc-version desc))
+             for pkg = (assq sym package-archive-contents)
+             for cversion = (and pkg (package-desc-version desc))
+             for available = (and pkg (not (package-disabled-p sym cversion)) 
pkg)
              when (or (and available
                            (or (and include-builtins (not cversion))
                                (and cversion



reply via email to

[Prev in Thread] Current Thread [Next in Thread]