Changeset 64 for trunk/LocalPlayer/Term.pas

Timestamp:

Jan 14, 2017, 12:52:41 AM (7 years ago)

Author:

chronos

Message:

• Added: New configuration dialog for selecting interface language.
• Added: Czech and Deutch language recoded to UTF-8.

File:

• trunk/LocalPlayer/Term.pas (modified) (1 diff)

trunk/LocalPlayer/Term.pas

@@ -1271 +1271 @@
   begin
     UnusedTribeFiles.Clear;
-    ok := FindFirst(DataDir + 'Localization' + DirectorySeparator + 'Tribes' +
-      DirectorySeparator + '*.tribe.txt', faArchive + faReadOnly,
-      SearchRec) = 0;
+    ok := FindFirst(LocalizedFilePath('Tribes') + DirectorySeparator + '*.tribe.txt',
+      faArchive + faReadOnly, SearchRec) = 0;
     if not ok then
     begin
       FindClose(SearchRec);
-      ok := FindFirst(HomeDir + 'Tribes' + DirectorySeparator + '*.tribe.txt',
+      ok := FindFirst(LocalizedFilePath('Tribes' + DirectorySeparator + '*.tribe.txt'),
         faArchive + faReadOnly, SearchRec) = 0;
     end;