diff lisp/textmodes/tex-mode.el @ 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 e5a07aa840d9
children c277eb06ba34 4da4a09e8b1b
line wrap: on
line diff
--- 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)