diff options
| author | John Mandereau <john.mandereau@gmail.com> | 2008-09-10 17:39:26 +0200 |
|---|---|---|
| committer | John Mandereau <john.mandereau@gmail.com> | 2008-09-10 17:39:26 +0200 |
| commit | 261ea9f6485299a83af9009dde326c634c0be152 (patch) | |
| tree | 7336af13b1be3491daf24badaa914519c9753d49 /elisp | |
| parent | 0c7f8e01075638c79d6957283a4a6184d7d751f7 (diff) | |
Emacs mode: escape file name special characters in shell commands
Diffstat (limited to 'elisp')
| -rw-r--r-- | elisp/lilypond-mode.el | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/elisp/lilypond-mode.el b/elisp/lilypond-mode.el index 769331fe03..80a3f298eb 100644 --- a/elisp/lilypond-mode.el +++ b/elisp/lilypond-mode.el @@ -638,8 +638,7 @@ Must be the car of an entry in `LilyPond-command-alist'." (base (cadr l))) (LilyPond-command-expand (concat (substring string 0 b) - dir - base + (shell-quote-argument (concat dir base)) (let ((entry (assoc (substring string b e) LilyPond-expand-alist))) (if entry (cdr entry) "")) |