(comint-substitute-in-file-name): Call replace-match

with second and third arg t.

(comint-substitute-in-file-name): Call replace-match
with second and third arg t.
db7ae45b · Gerd Moellmann · 61d461a8 · db7ae45b
Commit db7ae45b authored Jun 23, 2000 by Gerd Moellmann
Hide whitespace changes
Inline Side-by-side

Showing with 1 addition and 1 deletion

lisp/comint.el lisp/comint.el +1 -1

No files found.
--- a/lisp/comint.el
+++ b/lisp/comint.el
@@ -2086,7 +2086,7 @@ interpreter (e.g., the percent notation of cmd.exe on NT)."
 	      (setq env-var-val (if (getenv env-var-name)
 				    (getenv env-var-name)
 				  ""))
-	      (setq name (replace-match env-var-val nil nil name))))))
+	      (setq name (replace-match env-var-val t t name))))))
    name))

 (defun comint-match-partial-filename ()