diff options
| author | Kim F. Storm <storm@cua.dk> | 2006-10-06 12:49:12 +0000 |
|---|---|---|
| committer | Kim F. Storm <storm@cua.dk> | 2006-10-06 12:49:12 +0000 |
| commit | ec579201eee79908000edc03b34731995400f9e4 (patch) | |
| tree | a7824a133ab6834e081cfeefe9fa0a8e4dc77ae2 /lisp | |
| parent | 5879ac68699f4268beffff69535c421f6d8aed0a (diff) | |
| download | emacs-ec579201eee79908000edc03b34731995400f9e4.tar.gz | |
(ido-wide-find-dirs-or-files): Use shell-quote-argument.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/ido.el | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/lisp/ido.el b/lisp/ido.el index b68a4622ef8..d4ed85ea105 100644 --- a/lisp/ido.el +++ b/lisp/ido.el @@ -3136,7 +3136,12 @@ for first matching file." (let ((filenames (split-string (shell-command-to-string - (concat "find " dir " -name \"" (if prefix "" "*") file "*\" -type " (if finddir "d" "f") " -print")))) + (concat "find " + (shell-quote-argument dir) + " -name " + (shell-quote-argument + (concat (if prefix "" "*") file "*")) + " -type " (if finddir "d" "f") " -print")))) filename d f res) (while filenames |