hedgewars/uLocale.pas
changeset 10015 4feced261c68
parent 10009 88929358d2e1
parent 9956 0c6286c67b8d
child 10080 ac51bcb534ef
--- a/hedgewars/uLocale.pas	Sun Jan 19 00:18:28 2014 +0400
+++ b/hedgewars/uLocale.pas	Tue Jan 21 22:38:13 2014 +0100
@@ -36,13 +36,14 @@
 {$ENDIF}
 
 implementation
-uses uRandom, uUtils, uVariables, uDebug, uPhysFSLayer, sysutils;
+uses uRandom, uVariables, uDebug, uPhysFSLayer, sysutils;
 
 var trevt: array[TEventId] of array [0..Pred(MAX_EVENT_STRINGS)] of PChar;
     trevt_n: array[TEventId] of integer;
 
 procedure LoadLocale(FileName: shortstring);
-var s, sc: PChar;
+var s: PChar = nil;
+    sc: PChar;
     f: pfsFile;
     a, b, c: LongInt;
     first: array[TEventId] of boolean;