diff options
| author | Eli Zaretskii <eliz@gnu.org> | 2006-10-14 14:10:25 +0000 |
|---|---|---|
| committer | Eli Zaretskii <eliz@gnu.org> | 2006-10-14 14:10:25 +0000 |
| commit | 65b4263fd0905486a41fb3e1a0e4ef2a2fb0e68d (patch) | |
| tree | 5c8c97739ef45dfcf7979747dfd8e007d0fbe26a /lisp/filesets.el | |
| parent | 53bc2a31a39d07e3dab704188a7b8378e2783d19 (diff) | |
| download | emacs-65b4263fd0905486a41fb3e1a0e4ef2a2fb0e68d.tar.gz | |
(filesets-cmd-shell-command): Quote buffer-file-name to protect whitespace and
metacharacters from the shell.
Diffstat (limited to 'lisp/filesets.el')
| -rw-r--r-- | lisp/filesets.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/filesets.el b/lisp/filesets.el index eb8cdb02617..6e6ffc3add0 100644 --- a/lisp/filesets.el +++ b/lisp/filesets.el @@ -1701,7 +1701,7 @@ Replace <file-name> or <<file-name>> with filename." ok) t))) (when ok - (let ((cmd (format txt (buffer-file-name)))) + (let ((cmd (format txt (shell-quote-argument (buffer-file-name))))) (message "Filesets: %s" cmd) (filesets-cmd-show-result cmd (shell-command-to-string cmd)))))) |