branch: elpa/helm
commit 1a97cf31ef56d74bbe8f761081baea6b5eeb7d3a
Author: Thierry Volpiatto <[email protected]>
Commit: Thierry Volpiatto <[email protected]>
Store directory value in helm-ag source
Add new slot to helm-grep-ag-class and use it when building source.
---
helm-grep.el | 4 ++++
1 file changed, 4 insertions(+)
diff --git a/helm-grep.el b/helm-grep.el
index 41cb8016b0..c3c07bf44a 100644
--- a/helm-grep.el
+++ b/helm-grep.el
@@ -1709,6 +1709,9 @@ returns if available with current AG version."
(persistent-action :initform 'helm-grep-persistent-action)
(persistent-help :initform "Jump to line (`C-u' Record in mark ring)")
(candidate-number-limit :initform 99999)
+ (directory :initarg :directory :initform nil
+ :documentation
+ " Directory currently searched.")
(requires-pattern :initform 2)
(nomark :initform t)
(action :initform 'helm-grep-actions)
@@ -1732,6 +1735,7 @@ If INPUT is provided, use it as the search string."
:header-name (lambda (name)
(format "%s [%s]"
name (abbreviate-file-name directory)))
+ :directory directory
:candidates-process
(lambda () (helm-grep-ag-init directory type))))
(helm-set-local-variable 'helm-input-idle-delay helm-grep-input-idle-delay)
