hedgewars/uLocale.pas
branchqmlfrontend
changeset 11408 b894922d58cc
parent 11204 08c6ccc28007
child 11549 b69f5f22a3ba
--- a/hedgewars/uLocale.pas	Tue Sep 08 19:20:58 2015 +0300
+++ b/hedgewars/uLocale.pas	Mon Nov 16 22:57:24 2015 +0300
@@ -30,7 +30,7 @@
 function  GetEventString(e: TEventId): ansistring;
 
 {$IFDEF HWLIBRARY}
-procedure LoadLocaleWrapper(str: pchar); cdecl; export;
+procedure LoadLocaleWrapper(path: pchar; filename: pchar); cdecl; export;
 {$ENDIF}
 
 implementation
@@ -133,9 +133,20 @@
 end;
 
 {$IFDEF HWLIBRARY}
-procedure LoadLocaleWrapper(str: pchar); cdecl; export;
+procedure LoadLocaleWrapper(path: pchar; filename: pchar); cdecl; export;
 begin
-    LoadLocale(Strpas(str));
+// FIXME
+{    PathPrefix := Strpas(path);
+ 
+    uUtils.initModule(false);
+    uVariables.initModule;
+    uPhysFSLayer.initModule;
+} 
+    LoadLocale(Strpas(filename));
+{ 
+    uPhysFSLayer.freeModule;
+    uVariables.freeModule;
+    uUtils.freeModule;}
 end;
 {$ENDIF}