--- a/hedgewars/uLocale.pas	Thu Jan 10 22:54:55 2013 +0400
+++ b/hedgewars/uLocale.pas	Thu Jan 10 22:59:46 2013 +0400
@@ -40,14 +40,12 @@
     trevt_n: array[TEventId] of integer;
 
 procedure LoadLocale(FileName: shortstring);
-var s: ansistring;
+var s: ansistring = '';
     f: pfsFile;
     a, b, c: LongInt;
     first: array[TEventId] of boolean;
     e: TEventId;
-    loaded: boolean;
 begin
-loaded:= false;
 for e:= Low(TEventId) to High(TEventId) do
     first[e]:= true;