--- a/hedgewars/uStore.pas	Sun Feb 11 11:55:38 2007 +0000
+++ b/hedgewars/uStore.pas	Sun Feb 11 12:27:45 2007 +0000
@@ -438,7 +438,7 @@
 end;
 
 function  RenderString(s: string; Color: Longword; font: THWFont): PSDL_Surface;
-var w, h: Longint;
+var w, h: LongInt;
     Result: PSDL_Surface;
 begin
 TTF_SizeUTF8(Fontz[font].Handle, Str2PChar(s), w, h);