hedgewars/uLocale.pas
changeset 11802 975c130c3901
parent 11790 ac93cfc17365
child 11828 a69124eb7ce7
child 12461 e29a4238dc19
equal deleted inserted replaced
11801:ae58d7ad0d97 11802:975c130c3901
   140     UserPathPrefix := Strpas(userpath);
   140     UserPathPrefix := Strpas(userpath);
   141  
   141  
   142     //normally this var set in preInit of engine
   142     //normally this var set in preInit of engine
   143     allOK := true;
   143     allOK := true;
   144     
   144     
       
   145     uVariables.initModule;
       
   146  
   145     PathPrefix:= PathPrefix + #0;
   147     PathPrefix:= PathPrefix + #0;
   146     UserPathPrefix:= UserPathPrefix + #0;
   148     UserPathPrefix:= UserPathPrefix + #0;
   147     uPhysFSLayer.initModule(@PathPrefix[1], @UserPathPrefix[1]);
   149     uPhysFSLayer.initModule(@PathPrefix[1], @UserPathPrefix[1]);
   148     PathPrefix:= copy(PathPrefix, 1, length(PathPrefix) - 1);
   150     PathPrefix:= copy(PathPrefix, 1, length(PathPrefix) - 1);
   149     UserPathPrefix:= copy(UserPathPrefix, 1, length(UserPathPrefix) - 1);
   151     UserPathPrefix:= copy(UserPathPrefix, 1, length(UserPathPrefix) - 1);
   150  
   152  
   151     LoadLocale(Strpas(filename));
   153     LoadLocale(Strpas(filename));
   152  
   154  
   153     uPhysFSLayer.freeModule;
   155     uPhysFSLayer.freeModule;
       
   156     uVariables.freeModule;
   154 end;
   157 end;
   155 {$ENDIF}
   158 {$ENDIF}
   156 
   159 
   157 end.
   160 end.