[Emacs-diffs] master 06bbd6d 1/3: Do not handle :stop in tramp-*-handle-make-process

[Michael Albinus]

branch: master
commit 06bbd6dfd131315ead26439ce13f96a3c3f5645e
Author: Michael Albinus <address@hidden>
Commit: Michael Albinus <address@hidden>

    Do not handle :stop in tramp-*-handle-make-process
    
    * lisp/net/tramp-adb.el (tramp-adb-handle-make-process):
    * lisp/net/tramp-sh.el (tramp-sh-handle-make-process): Do not
    handle :stop anymore.
---
 lisp/net/tramp-adb.el | 4 ----
 lisp/net/tramp-sh.el  | 4 ----
 2 files changed, 8 deletions(-)

diff --git a/lisp/net/tramp-adb.el b/lisp/net/tramp-adb.el
index f3aa55f..71d7f61 100644
--- a/lisp/net/tramp-adb.el
+++ b/lisp/net/tramp-adb.el
@@ -934,7 +934,6 @@ PRESERVE-UID-GID and PRESERVE-EXTENDED-ATTRIBUTES are 
completely ignored."
            (command (plist-get args :command))
            (coding (plist-get args :coding))
            (noquery (plist-get args :noquery))
-           (stop (plist-get args :stop))
            (connection-type (plist-get args :connection-type))
            (filter (plist-get args :filter))
            (sentinel (plist-get args :sentinel))
@@ -1010,9 +1009,6 @@ PRESERVE-UID-GID and PRESERVE-EXTENDED-ATTRIBUTES are 
completely ignored."
                      ;; Send the command.
                      (let* ((p (tramp-get-connection-process v)))
                         (tramp-adb-send-command v command nil t) ; nooutput
-                       ;; Stop process if indicated.
-                       (when stop
-                         (stop-process p))
                        ;; Set sentinel and filter.
                        (when sentinel
                          (set-process-sentinel p sentinel))
diff --git a/lisp/net/tramp-sh.el b/lisp/net/tramp-sh.el
index d9751a9..dc64726 100644
--- a/lisp/net/tramp-sh.el
+++ b/lisp/net/tramp-sh.el
@@ -2781,7 +2781,6 @@ the result will be a local, non-Tramp, file name."
            (command (plist-get args :command))
            (coding (plist-get args :coding))
            (noquery (plist-get args :noquery))
-           (stop (plist-get args :stop))
            (connection-type (plist-get args :connection-type))
            (filter (plist-get args :filter))
            (sentinel (plist-get args :sentinel))
@@ -2933,9 +2932,6 @@ the result will be a local, non-Tramp, file name."
                             v 'file-error
                             "pty association is not supported for `%s'"
                             name))))
-                     ;; Stop process if indicated.
-                     (when stop
-                       (stop-process p))
                      ;; Set sentinel and filter.
                      (when sentinel
                        (set-process-sentinel p sentinel))