# HG changeset patch
# User Gerd Moellmann <gerd@gnu.org>
# Date 961743913 0
# Node ID 53bc9bb1f0b883ce176195db5db0ae69642d9ffa
# Parent  c12b0f070cd1448e346b8e7fc26e1ffdf84e8522
(comint-substitute-in-file-name): Call replace-match
with second and third arg t.

diff -r c12b0f070cd1 -r 53bc9bb1f0b8 lisp/comint.el
--- a/lisp/comint.el	Fri Jun 23 06:12:11 2000 +0000
+++ b/lisp/comint.el	Fri Jun 23 07:05:13 2000 +0000
@@ -2086,7 +2086,7 @@
 	      (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 ()