[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa/helm c6f141c4d2 3/5: Don't handle default from helm-comple
From: |
ELPA Syncer |
Subject: |
[nongnu] elpa/helm c6f141c4d2 3/5: Don't handle default from helm-completion--initial-filter |
Date: |
Sun, 6 Aug 2023 12:59:49 -0400 (EDT) |
branch: elpa/helm
commit c6f141c4d2e1d263bf0da5f47a1b22850e9ba164
Author: Thierry Volpiatto <thievol@posteo.net>
Commit: Thierry Volpiatto <thievol@posteo.net>
Don't handle default from helm-completion--initial-filter
it is done later by next FCT.
---
helm-mode.el | 12 ++++--------
1 file changed, 4 insertions(+), 8 deletions(-)
diff --git a/helm-mode.el b/helm-mode.el
index f95bd7fab2..d8d0e2a285 100644
--- a/helm-mode.el
+++ b/helm-mode.el
@@ -1022,14 +1022,10 @@ dynamically otherwise use
`helm-completing-read-default-2'."
1 0)
:fc-transformer (append (list (lambda (candidates _source)
(helm-completion--initial-filter
- (let* ((all (copy-sequence candidates))
- (lst (if (and sort-fn (> (length
helm-pattern) 0))
- (funcall sort-fn all)
- all)))
- (if (and default (string= helm-pattern
""))
- (append (list default)
- (delete default lst))
- lst))
+ (let ((all (copy-sequence candidates)))
+ (if (and sort-fn (> (length
helm-pattern) 0))
+ (funcall sort-fn all)
+ candidates))
afun afix file-comp-p)))
'(helm-cr-default-transformer))
:quit-when-no-cand (eq require-match t)