# HG changeset patch
# User Eli Zaretskii <eliz@gnu.org>
# Date 1017475008 0
# Node ID 71d51af13f8aa12b41b62cc4be47622f00607138
# Parent  166f03d282d776c3cf6c6b02873d75daa27308ed
(command-line): Fix last change.

diff -r 166f03d282d7 -r 71d51af13f8a lisp/startup.el
--- a/lisp/startup.el	Sat Mar 30 07:56:05 2002 +0000
+++ b/lisp/startup.el	Sat Mar 30 07:56:48 2002 +0000
@@ -657,8 +657,7 @@
 	(list (list "\\`/[^/]*:\\(.+/\\)*\\(.*\\)"
 		    ;; Don't put "\\2" inside expand-file-name, since
 		    ;; it will be transformed to "/2" on DOS/Windows.
-		    (concat (expand-file-name temporary-file-directory)
-			    "\\2"))))
+		    (concat temporary-file-directory "\\2"))))
 
   ;; See if we should import version-control from the environment variable.
   (let ((vc (getenv "VERSION_CONTROL")))