Github/emacs
2
0
Fork 1
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-17 10:27:41 +00:00
Code Issues Projects Releases Packages Wiki Activity

Fix quoting in tramp-find-inline-compress for w32

Browse source 
* lisp/net/tramp-sh.el (tramp-find-inline-compress): Improve command
quoting for w32.  Reported by Chris Zheng <chriszheng99@gmail.com>.
This commit is contained in:
Michael Albinus 2018-02-02 14:33:33 +01:00
parent e08de2bae2
commit ecc6257f48
1 changed files with 5 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

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

@ -4464,13 +4464,14 @@ Goes through the list `tramp-inline-compress-commands'."
(zerop
(tramp-call-local-coding-command
(format
"echo %s | %s | %s" magic
;; Windows shells need the program file name after
;; the pipe symbol be quoted if they use forward
;; slashes as directory separators.
(if (memq system-type '(windows-nt))
"echo %s | \"%s\" | \"%s\""
"echo %s | %s | %s")
magic compress decompress)
(mapconcat
'shell-quote-argument (split-string compress) " ")
(mapconcat
'shell-quote-argument (split-string decompress) " "))
nil nil))
(throw 'next nil))
(tramp-message