Quote arguments when using start-process-shell-command.

Manual "backport" of 1cbff4a.
justinweiss · Sep 22, 2011 · 0216fc4 · 0216fc4
1 parent 7e0944a
commit 0216fc4
Showing 1 changed file with 3 additions and 1 deletion.
diff --git a/el-get-core.el b/el-get-core.el
@@ -236,8 +236,10 @@ Any other property will get put into the process object.
                (killed  (when (get-buffer cbuf) (kill-buffer cbuf)))
                (filter  (plist-get c :process-filter))
                (program (plist-get c :program))
-               (args    (plist-get c :args))
                (shell   (plist-get c :shell))
+               (args    (if shell
+			    (mapcar #'shell-quote-argument (plist-get c :args))
+			  (plist-get c :args)))
                (sync    (if (plist-member c :sync) (plist-get c :sync)
                           el-get-default-process-sync))
 	       (stdin   (plist-get c :stdin))