[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa/helm a8ef7a391e 2/2: Prevent adding duplicates while adjus
From: |
ELPA Syncer |
Subject: |
[nongnu] elpa/helm a8ef7a391e 2/2: Prevent adding duplicates while adjusting metadata |
Date: |
Thu, 26 Sep 2024 10:00:17 -0400 (EDT) |
branch: elpa/helm
commit a8ef7a391e64c261c9b8ce758abc0e92a51fcfeb
Author: Thierry Volpiatto <thievol@posteo.net>
Commit: Thierry Volpiatto <thievol@posteo.net>
Prevent adding duplicates while adjusting metadata
This is done for the helm style fn but seems the same problem happens
with flex adjust metadata fn.
---
helm-mode.el | 4 +++-
1 file changed, 3 insertions(+), 1 deletion(-)
diff --git a/helm-mode.el b/helm-mode.el
index 52d1aef7ec..eea2e57b22 100644
--- a/helm-mode.el
+++ b/helm-mode.el
@@ -2499,7 +2499,9 @@ Currently does nothing."
. ,compose-helm-sort-fn)
(cycle-sort-function
. ,compose-helm-sort-fn)
- ,@(cdr metadata)))))
+ ,@(cl-loop for (elm . val) in (cdr metadata)
+ unless (memq elm '(display-sort-function
cycle-sort-function))
+ collect (cons elm val))))))
(put 'helm 'completion--adjust-metadata 'helm-completion--adjust-metadata)
;; Helm-flex style.