Mercurial > emacs
changeset 92214:5320f249b91c
(shell-quote-wildcard-pattern): Quote ' and " as well.
| author | Chong Yidong <cyd@stupidchicken.com> |
|---|---|
| date | Mon, 25 Feb 2008 17:42:13 +0000 |
| parents | 8a0eaeb2f895 |
| children | 4a11735d1bdb |
| files | lisp/files.el |
| diffstat | 1 files changed, 2 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/files.el Mon Feb 25 17:41:59 2008 +0000 +++ b/lisp/files.el Mon Feb 25 17:42:13 2008 +0000 @@ -4869,7 +4869,7 @@ PATTERN is assumed to represent a file-name wildcard suitable for the underlying filesystem. For Unix and GNU/Linux, the characters from the -set [ \\t\\n;<>&|()#$] are quoted with a backslash; for DOS/Windows, all +set [ \\t\\n;<>&|()'\"#$] are quoted with a backslash; for DOS/Windows, all the parts of the pattern which don't include wildcard characters are quoted with double quotes. Existing quote characters in PATTERN are left alone, so you can pass @@ -4901,7 +4901,7 @@ (concat result (substring pattern beg) "\"")))) (t (let ((beg 0)) - (while (string-match "[ \t\n;<>&|()#$]" pattern beg) + (while (string-match "[ \t\n;<>&|()'\"#$]" pattern beg) (setq pattern (concat (substring pattern 0 (match-beginning 0)) "\\"