Fix build errors

[winmerge-jp/winmerge-jp.git] / ExpandEnvironmenStrings.vbs

diff --git a/ExpandEnvironmenStrings.vbs b/ExpandEnvironmenStrings.vbs
index 3cdb899..91a722f 100644 (file)
--- a/ExpandEnvironmenStrings.vbs
+++ b/ExpandEnvironmenStrings.vbs
@@ -1,10 +1,10 @@
-Dim fso: Set fso = CreateObject("Scripting.FileSystemObject")\r
-Dim sh: Set sh = CreateObject("WScript.Shell")\r
-Dim otf: Set otf = fso.OpenTextFile(WScript.Arguments.Unnamed(0), 1)\r
-\r
-Do Until otf.AtEndOfStream = True\r
-       WScript.Echo sh.ExpandEnvironmentStrings(otf.ReadLine)\r
-Loop\r
-\r
-otf.Close\r
-\r
+Dim fso: Set fso = CreateObject("Scripting.FileSystemObject")
+Dim sh: Set sh = CreateObject("WScript.Shell")
+Dim otf: Set otf = fso.OpenTextFile(WScript.Arguments.Unnamed(0), 1)
+
+Do Until otf.AtEndOfStream = True
+       WScript.Echo sh.ExpandEnvironmentStrings(otf.ReadLine)
+Loop
+
+otf.Close
+