Changeset 135 for trunk/Target/UTargetJavascript.pas

Timestamp:

Mar 5, 2022, 9:44:18 AM (2 years ago)

Author:

chronos

Message:

• Modified: Code cleanup.
• Modified: More translated strings.

File:

• trunk/Target/UTargetJavascript.pas (modified) (2 diffs)

trunk/Target/UTargetJavascript.pas

@@ -101 +101 @@
       '</html>';
     HtmlFile := ExtractFilePath(ProjectFileName) +
-      'compiled' + DirectorySeparator + Name + DirectorySeparator +
+      CompiledDir + DirectorySeparator + Name + DirectorySeparator +
       ExtractFileNameOnly(ProjectFileName) + '.html';
     ForceDirectories(ExtractFilePath(HtmlFile));
@@ -116 +116 @@
   inherited;
   HtmlFile := ExtractFilePath(ProjectFileName) +
-    'compiled' + DirectorySeparator + Name + DirectorySeparator +
+    CompiledDir + DirectorySeparator + Name + DirectorySeparator +
     ExtractFileNameOnly(ProjectFileName) + '.html';