diff options
-rw-r--r-- | lisp/shell.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/shell.el b/lisp/shell.el index 2adfc79618a..d3e23251a1f 100644 --- a/lisp/shell.el +++ b/lisp/shell.el @@ -298,7 +298,9 @@ Value is a list of strings, which may be nil." (equal name "bash") (file-executable-p prog) (string-match "bad option" - (shell-command-to-string (concat prog " --noediting")))) + (shell-command-to-string + (concat (shell-quote-argument prog) + " --noediting")))) '("-i") '("--noediting" "-i"))) "Args passed to inferior shell by \\[shell], if the shell is bash. |