[nongnu] elpa/helm 57332b4bda: Notify `helm-resume' we are completing filenames

[ELPA Syncer]

branch: elpa/helm
commit 57332b4bdad1d771f7d103157c45d77f6007e02b
Author: Thierry Volpiatto <thievol@posteo.net>
Commit: Thierry Volpiatto <thievol@posteo.net>

    Notify `helm-resume' we are completing filenames
    
    As `minibuffer-completing-file-name` is let-bounded, there is no way
    to pass it later to helm-resume, so use a new slot
    :completing-file-name in HFF class.
---
 helm-core.el  | 1 +
 helm-files.el | 3 +++
 2 files changed, 4 insertions(+)

diff --git a/helm-core.el b/helm-core.el
index 7e355d8140..f50ad3b0f2 100644
--- a/helm-core.el
+++ b/helm-core.el
@@ -4668,6 +4668,7 @@ See `helm-fuzzy-default-highlight-match'."
   (cl-loop with diac = (helm-get-attr 'diacritics source)
            with file-comp-p = (and (not (helm-action-window))
                                    (or minibuffer-completing-file-name
+                                       (helm-get-attr 'completing-file-name 
source)
                                        (helm-guess-filename-at-point)))
            ;; helm-pattern may have been modified (fuzzy) so ensure to
            ;; use helm-input which is the raw pattern.
diff --git a/helm-files.el b/helm-files.el
index cf7c8d5ab0..9a40135d43 100644
--- a/helm-files.el
+++ b/helm-files.el
@@ -1016,6 +1016,9 @@ Should not be used among other sources.")
    (nohighlight :initform (progn helm-ff-nohighlight-matches))
    (keymap :initform 'helm-find-files-map)
    (candidate-number-limit :initform 'helm-ff-candidate-number-limit)
+   (completing-file-name
+    :initarg :completing-file-name :initform t
+    :documentation "Flag to notify `helm-resume' we are completing filenames.")
    (action-transformer
     :initform 'helm-find-files-action-transformer)
    (action :initform 'helm-find-files-actions)