[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa/helm a25fa0e614: Ensure helm-ff-icons-transformer is not a
From: |
ELPA Syncer |
Subject: |
[nongnu] elpa/helm a25fa0e614: Ensure helm-ff-icons-transformer is not appended again |
Date: |
Fri, 20 May 2022 00:58:30 -0400 (EDT) |
branch: elpa/helm
commit a25fa0e614357fbee3266988c8f6675f706f0557
Author: Thierry Volpiatto <thievol@posteo.net>
Commit: Thierry Volpiatto <thievol@posteo.net>
Ensure helm-ff-icons-transformer is not appended again
when helm-ff-icon-mode is called programatically.
---
helm-files.el | 15 ++++++++-------
1 file changed, 8 insertions(+), 7 deletions(-)
diff --git a/helm-files.el b/helm-files.el
index 2e2013afc6..9da750751e 100644
--- a/helm-files.el
+++ b/helm-files.el
@@ -4136,16 +4136,17 @@ it from your init file, ensure to call it _after_ your
defmethod's
(require 'all-the-icons)
(if helm-ff-icon-mode
(progn
- (unless helm-source-find-files
+ (unless helm-source-find-files
(setq helm-source-find-files
(helm-make-source
"Find Files" 'helm-source-ffiles)))
- (helm-set-attr 'filtered-candidate-transformer
- (append (helm-get-attr
- 'filtered-candidate-transformer
- helm-source-find-files)
- '(helm-ff-icons-transformer))
- helm-source-find-files))
+ (let ((fct (helm-get-attr
+ 'filtered-candidate-transformer
+ helm-source-find-files)))
+ (unless (memq 'helm-ff-icons-transformer fct)
+ (helm-set-attr 'filtered-candidate-transformer
+ (append fct '(helm-ff-icons-transformer))
+ helm-source-find-files))))
(helm-set-attr 'filtered-candidate-transformer
(remove 'helm-ff-icons-transformer
(helm-get-attr
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [nongnu] elpa/helm a25fa0e614: Ensure helm-ff-icons-transformer is not appended again,
ELPA Syncer <=