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

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

[nongnu] elpa/helm 99148ea546 1/9: Use in-buffer for all sources in helm


From: ELPA Syncer
Subject: [nongnu] elpa/helm 99148ea546 1/9: Use in-buffer for all sources in helm-packages
Date: Sun, 20 Aug 2023 12:59:52 -0400 (EDT)

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

    Use in-buffer for all sources in helm-packages
    
    Prefer :init to avoid error is :data is empty.
---
 helm-packages.el | 14 +++++++++-----
 1 file changed, 9 insertions(+), 5 deletions(-)

diff --git a/helm-packages.el b/helm-packages.el
index 7daaefb82f..4deab478e0 100644
--- a/helm-packages.el
+++ b/helm-packages.el
@@ -200,8 +200,9 @@ packages no more availables."
   (let ((upgrades (package--upgradeable-packages))
         (removables (package--removable-packages)))
     (helm :sources (list
-                    (helm-build-sync-source "Availables for upgrade"
-                      :candidates upgrades
+                    (helm-build-in-buffer-source "Availables for upgrade"
+                      :init (lambda ()
+                              (helm-init-candidates-in-buffer 'global 
upgrades))
                       :find-file-target #'helm-packages-quit-an-find-file
                       :filtered-candidate-transformer
                       (lambda (candidates _source)
@@ -212,8 +213,9 @@ packages no more availables."
                                                c)))
                       :coerce #'helm-symbolify
                       :action '(("Upgrade package(s)" . 
helm-packages-upgrade)))
-                    (helm-build-sync-source "Packages to delete"
-                      :candidates removables
+                    (helm-build-in-buffer-source "Packages to delete"
+                      :init (lambda ()
+                              (helm-init-candidates-in-buffer 'global 
removables))
                       :coerce #'helm-symbolify
                       :find-file-target #'helm-packages-quit-an-find-file
                       :filtered-candidate-transformer
@@ -225,7 +227,9 @@ packages no more availables."
                                                c)))
                       :action '(("Delete package(s)" . helm-packages-delete)))
                     (helm-build-in-buffer-source "Installed packages"
-                      :data (mapcar #'car package-alist)
+                      :init (lambda ()
+                              (helm-init-candidates-in-buffer 'global
+                                (mapcar #'car package-alist)))
                       :coerce #'helm-symbolify
                       :find-file-target #'helm-packages-quit-an-find-file
                       :filtered-candidate-transformer



reply via email to

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