hedgewars/uScript.pas
changeset 5120 c4d5ddf939fc
parent 5118 9cfdb9bc6140
child 5124 84267f79879b
--- a/hedgewars/uScript.pas	Thu Apr 07 21:43:43 2011 +0400
+++ b/hedgewars/uScript.pas	Thu Apr 07 14:13:11 2011 -0400
@@ -1559,7 +1559,6 @@
     st : TSound;
     he : THogEffect;
     cg : TCapGroup;
-    s, t : ansistring;
 begin
 // initialize lua
 luaState:= lua_open;
@@ -1575,11 +1574,7 @@
 ScriptSetInteger('LAND_WIDTH', LAND_WIDTH);
 ScriptSetInteger('LAND_HEIGHT', LAND_HEIGHT);
 
-// import locale
-s:= cLocaleFName;
-t:= '';
-SplitByChar(s, t, '.');
-ScriptSetString('L', s);
+ScriptSetString('L', cLocale);
 
 // import game flags
 ScriptSetInteger('gfForts', gfForts);