[elpa] externals/dtache 4c47fa3ddb 122/158: Fix error in dtache-attach

[ELPA Syncer]

branch: externals/dtache
commit 4c47fa3ddb816150d05d16eb3d9eecef617437c0
Author: Niklas Eklund <niklas.eklund@posteo.net>
Commit: Niklas Eklund <niklas.eklund@posteo.net>

    Fix error in dtache-attach
---
 dtache.el | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/dtache.el b/dtache.el
index 35eb7c6a1e..15bbf3b73a 100644
--- a/dtache.el
+++ b/dtache.el
@@ -628,8 +628,9 @@ If session is not valid trigger an automatic cleanup on 
SESSION's host."
       (if (dtache--session-redirect-only session)
           (dtache--attach-session session)
         (cl-letf* (((symbol-function #'set-process-sentinel) #'ignore)
-                   (buffer dtache--shell-command-buffer))
-          (funcall #'async-shell-command (dtache--session-command session) 
buffer)
+                   (buffer dtache--shell-command-buffer)
+                   (dtach-command (dtache-dtach-command session t)))
+          (funcall #'async-shell-command dtach-command buffer)
           (with-current-buffer buffer (setq dtache--buffer-session 
dtache--current-session)))))))
 
 ;;;;; Other