branch: elpa/helm
commit a2f5185d61acc06d0c28baa586cd07b77ed03225
Author: Thierry Volpiatto <[email protected]>
Commit: Thierry Volpiatto <[email protected]>
Fix source name in helm-fd
---
helm-fd.el | 9 +++++----
1 file changed, 5 insertions(+), 4 deletions(-)
diff --git a/helm-fd.el b/helm-fd.el
index 4f76bb78a3..9ec5c8956f 100644
--- a/helm-fd.el
+++ b/helm-fd.el
@@ -132,10 +132,11 @@
(cl-assert (executable-find helm-fd-executable) nil "Could not find fd
executable")
(cl-assert (not (file-remote-p directory)) nil "Fd not supported on remote
directories")
(let ((default-directory directory))
- (helm :sources (helm-make-source
- (format "fd (%s)"
- (abbreviate-file-name default-directory))
- 'helm-fd-class)
+ (helm :sources (helm-make-source "Fd" 'helm-fd-class
+ :header-name
+ (lambda (name)
+ (format "%s (%s)"
+ name (abbreviate-file-name default-directory))))
:buffer "*helm fd*")))
