[elpa] externals/dtache 5f12c82fed 090/158: Revert back dtache-eshell

[ELPA Syncer]

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

    Revert back dtache-eshell
    
    It didn't work well on a remote host.
---
 dtache-eshell.el | 11 +++++++----
 1 file changed, 7 insertions(+), 4 deletions(-)

diff --git a/dtache-eshell.el b/dtache-eshell.el
index fe2542b924..addbf7a708 100644
--- a/dtache-eshell.el
+++ b/dtache-eshell.el
@@ -53,16 +53,19 @@
     (dtache-completing-read sessions)))
 
 (defun dtache-eshell-maybe-create-session ()
-  "Create a session if `dtache-enabled' value is t."
+  "Create a session if `dtache-eshell-command' value is t."
   (when dtache-enabled
     (let* ((dtache-session-mode 'create)
            (dtache-session-action dtache-eshell-session-action)
            (command (mapconcat #'identity
                                `(,eshell-last-command-name
                                  ,@eshell-last-arguments)
-                               " ")))
-      (setq dtache--current-session (dtache-create-session command))
-      (setq dtache--buffer-session dtache--current-session))))
+                               " "))
+           (session (dtache-create-session command)))
+      (setq eshell-last-arguments (dtache-dtach-command session))
+      (setq dtache--buffer-session session)
+      (setq dtache-enabled nil)
+      (setq eshell-last-command-name "dtach"))))
 
 (defun dtache-eshell-get-dtach-process ()
   "Return `eshell' process if `dtache' is running."