procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Do not handle :stop in tramp-*-handle-make-process

Browse source 
* 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.
This commit is contained in:
Michael Albinus 2019-04-19 14:28:20 +02:00
parent 0eb47c2537
commit 06bbd6dfd1
2 changed files with 0 additions and 8 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
lisp/net/tramp-adb.el
View file

@ -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))

4
lisp/net/tramp-sh.el
View file

@ -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))