summaryrefslogtreecommitdiff
path: root/lisp/subr.el
diff options
context:
space:
mode:
authorDaniel Colascione <dan.colascione@gmail.com>2011-04-27 00:56:55 -0700
committerDaniel Colascione <dan.colascione@gmail.com>2011-04-27 00:56:55 -0700
commit2a782793a8596e6724207474bd7545684c83591d (patch)
tree614ff778f849e4fd273c6df16cd26c6446320864 /lisp/subr.el
parentf61f41d74747ed3189526ca70b128acf3719c6fa (diff)
downloademacs-2a782793a8596e6724207474bd7545684c83591d.tar.gz
* subr.el (shell-quote-argument): Use alternate escaping strategy
when we spot a variable reference in a string.
Diffstat (limited to 'lisp/subr.el')
-rw-r--r--lisp/subr.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/subr.el b/lisp/subr.el
index 2b6a5404060..e374b56d2a8 100644
--- a/lisp/subr.el
+++ b/lisp/subr.el
@@ -2543,7 +2543,7 @@ Note: :data and :device are currently not supported on Windows."
"\\1\\1\\\\\""
argument)))
- (if (string-match "\"" argument)
+ (if (string-match "[%!\"]" argument)
(concat
"^\""
(replace-regexp-in-string