emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/helm 48a0152a53 2/5: Ensure not being prompted for passwor


From: ELPA Syncer
Subject: [nongnu] elpa/helm 48a0152a53 2/5: Ensure not being prompted for password
Date: Wed, 15 Jun 2022 09:05:07 -0400 (EDT)

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

    Ensure not being prompted for password
    
    each time we navigate to a directory.
    
    Variable password-cache is non-nil by default but ensure user didn't modify 
it.
---
 helm-files.el | 7 +++++--
 helm-mode.el  | 4 ++++
 2 files changed, 9 insertions(+), 2 deletions(-)

diff --git a/helm-files.el b/helm-files.el
index 3282905572..d61ccce5e4 100644
--- a/helm-files.el
+++ b/helm-files.el
@@ -100,7 +100,7 @@
 (defvar eshell-debug-command)
 (defvar eshell-current-command)
 (defvar tramp-archive-enabled)
-
+(defvar password-cache)
 
 (defgroup helm-files nil
   "Files applications and libraries for Helm."
@@ -5236,7 +5236,10 @@ Use it for non-interactive calls of `helm-find-files'."
                (not (minibuffer-window-active-p (minibuffer-window)))))
          (tap (thing-at-point 'filename))
          (def (and tap (or (file-remote-p tap)
-                           (expand-file-name tap)))))
+                           (expand-file-name tap))))
+         ;; Ensure not being prompted for password each time we
+         ;; navigate to a directory.
+         (password-cache t))
     (helm-set-local-variable 'helm-follow-mode-persistent nil
                              'helm-drag-mouse-1-fn 'helm-ff-drag-mouse-1-fn)
     (unless helm-source-find-files
diff --git a/helm-mode.el b/helm-mode.el
index 591bddca01..d685aa2cfb 100644
--- a/helm-mode.el
+++ b/helm-mode.el
@@ -28,6 +28,7 @@
 (defvar completion-flex-nospace)
 (defvar helm-completion--sorting-done)
 (defvar helm-mode)
+(defvar password-cache)
 
 ;; No warnings in Emacs built --without-x
 (declare-function x-file-dialog "xfns.c")
@@ -1368,6 +1369,9 @@ Keys description:
          (helm-ff--RET-disabled noret)
          (minibuffer-completion-predicate test)
          (minibuffer-completing-file-name t)
+         ;; Ensure not being prompted for password each time we
+         ;; navigate to a directory.
+         (password-cache t)
          (helm--completing-file-name t)
          (helm-read-file-name-mode-line-string
           (replace-regexp-in-string "helm-maybe-exit-minibuffer"



reply via email to

[Prev in Thread] Current Thread [Next in Thread]