Mercurial > emacs
changeset 61154:81b738b4c729
shell-quote-argument, not comint-quote-filename
| author | Karl Berry <karl@gnu.org> |
|---|---|
| date | Thu, 31 Mar 2005 00:24:57 +0000 |
| parents | f01b811afc3c |
| children | 801f886872c5 |
| files | lisp/ChangeLog lisp/textmodes/tex-mode.el |
| diffstat | 2 files changed, 15 insertions(+), 5 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Wed Mar 30 22:51:39 2005 +0000 +++ b/lisp/ChangeLog Thu Mar 31 00:24:57 2005 +0000 @@ -1,3 +1,13 @@ +2005-03-31 Karl Berry <karl@freefriends.org> + + * textmodes/tex-mode.el (tex-compile): shell-quote-argument, + not comint-quote-filename. + +2005-03-31 Olive Lin <olive.lin@versateladsl.be> (tiny change) + + * textmodes/tex-mode.el (tex-start-tex) shell-quote-argument, + not comint-quote-filename. + 2005-03-31 Thien-Thi Nguyen <ttn@gnu.org> * help-fns.el (help-with-tutorial): Revert last change. @@ -157,7 +167,7 @@ * vc.el (vc-do-command): Use a pipe for async processes, so password prompts don't show up at places where the user can't reply. -2005-03-29 Olive Lin <olive.lin@versateladsl.be> +2005-03-29 Olive Lin <olive.lin@versateladsl.be> (tiny change) * textmodes/tex-mode.el (tex-send-command): shell-quote-argument on the file name we pass to the inferior shell.
--- a/lisp/textmodes/tex-mode.el Wed Mar 30 22:51:39 2005 +0000 +++ b/lisp/textmodes/tex-mode.el Thu Mar 31 00:24:57 2005 +0000 @@ -1887,8 +1887,8 @@ (prog1 (file-name-directory (expand-file-name file)) (setq file (file-name-nondirectory file)))) (root (file-name-sans-extension file)) - (fspec (list (cons ?r (comint-quote-filename root)) - (cons ?f (comint-quote-filename file)))) + (fspec (list (cons ?r (shell-quote-argument root)) + (cons ?f (shell-quote-argument file)))) (default (tex-compile-default fspec))) (list default-directory (completing-read @@ -1909,14 +1909,14 @@ (compile-command (if star (concat (substring command 0 star) - (comint-quote-filename file) + (shell-quote-argument file) (substring command (1+ star))) (concat command " " tex-start-options (if (< 0 (length tex-start-commands)) (concat (shell-quote-argument tex-start-commands) " ")) - (comint-quote-filename file))))) + (shell-quote-argument file))))) (tex-send-tex-command compile-command dir))) (defun tex-send-tex-command (cmd &optional dir)