Fix error in tramp-sh-handle-make-process
* lisp/net/tramp-sh.el (tramp-sh-handle-make-process): Don't use heredoc script whent the argument contains a string.
This commit is contained in:
parent
49bc8586b7
commit
46f5d2867c
1 changed files with 3 additions and 1 deletions
|
@ -2850,8 +2850,10 @@ implementation will be used."
|
|||
;; command.
|
||||
(heredoc (and (stringp program)
|
||||
(string-match-p "sh$" program)
|
||||
(= (length args) 2)
|
||||
(string-equal "-c" (car args))
|
||||
(= (length args) 2)))
|
||||
;; Don't if there is a string.
|
||||
(not (string-match-p "'\\|\"" (cadr args)))))
|
||||
;; When PROGRAM is nil, we just provide a tty.
|
||||
(args (if (not heredoc) args
|
||||
(let ((i 250))
|
||||
|
|
Loading…
Add table
Reference in a new issue