[elpa] externals/async 0326332320: Allow passing tramp password to child emacs Fix issue #181

[ELPA Syncer]

branch: externals/async
commit 0326332320d0f51bf8bf773d87612fa766989dec
Author: Thierry Volpiatto <thievol@posteo.net>
Commit: Thierry Volpiatto <thievol@posteo.net>

    Allow passing tramp password to child emacs Fix issue #181
---
 async.el       | 3 +++
 dired-async.el | 3 ++-
 2 files changed, 5 insertions(+), 1 deletion(-)

diff --git a/async.el b/async.el
index e181773d9f..a74193298a 100644
--- a/async.el
+++ b/async.el
@@ -33,6 +33,7 @@
 ;;; Code:
 
 (eval-when-compile (require 'cl-lib))
+(require 'tramp)
 
 (defgroup async nil
   "Simple asynchronous processing in Emacs"
@@ -219,6 +220,8 @@ lasts complete line.  Every time we get new input, we try 
to look
 for newline, and if found, process the entire line and bump the
 marker position to the end of this next line."
   (with-current-buffer (process-buffer proc)
+    (when (string-match tramp-password-prompt-regexp string)
+      (process-send-string proc (concat (read-passwd (match-string 0 string)) 
"\n")))
     (goto-char (point-max))
     (save-excursion
       (insert string))
diff --git a/dired-async.el b/dired-async.el
index 81ed134683..7ae9942b9f 100644
--- a/dired-async.el
+++ b/dired-async.el
@@ -382,7 +382,8 @@ ESC or `q' to not overwrite any of the remaining files,
                        (let ((dired-recursive-copies (quote always))
                              (dired-copy-preserve-time
                               ,dired-copy-preserve-time)
-                             (dired-create-destination-dirs ',create-dir))
+                             (dired-create-destination-dirs ',create-dir)
+                             auth-source-save-behavior)
                          (setq overwrite-backup-query nil)
                          ;; Inline `backup-file' as long as it is not
                          ;; available in emacs.