branch: elpa/helm
commit d46bcc41e55dcb56b827fd61bc6abea23ba47777
Author: Thierry Volpiatto <[email protected]>
Commit: Thierry Volpiatto <[email protected]>
Fix helm-marked-candidates with marked cands in dummy sources
---
helm-core.el | 11 +++++++++--
1 file changed, 9 insertions(+), 2 deletions(-)
diff --git a/helm-core.el b/helm-core.el
index 0ea4e26472..296d4d34cf 100644
--- a/helm-core.el
+++ b/helm-core.el
@@ -7749,8 +7749,15 @@ sources."
(string-match-p "\\*" real)
(null (file-exists-p real)))
when (or all-sources
- (equal (assq 'name source)
- (assq 'name current-src)))
+ (and
+ ;; Dummy sources use a unique candidate, two
same
+ ;; dummy sources (or more) should share their
+ ;; (unique) marked candidate only when
+ ;; :all-marked is non nil.
+ (not (equal (helm-get-attr 'candidates)
+ '("dummy")))
+ (equal (assq 'name source)
+ (assq 'name current-src))))
nconc (helm--compute-marked real source use-wc) into mkds
finally return
(if (and with-wildcard all-sources)
