--- a/hedgewars/uLandTemplates.pas	Sun Oct 28 13:28:23 2012 +0100
+++ b/hedgewars/uLandTemplates.pas	Sun Oct 28 15:12:37 2012 +0100
@@ -24,10 +24,12 @@
 
 const NTPX = Low(SmallInt);
 
-type TPointArray = array[0..64] of TSDL_Rect;
+type TRectArray = array[0..64] of TSDL_Rect;
+     PRectArray = ^TRectArray;
+     TPointArray = array[0..64] of TPoint;
      PPointArray = ^TPointArray;
      TEdgeTemplate = record
-                     BasePoints: PPointArray;
+                     BasePoints: PRectArray;
                      BasePointsCount: Longword;
                      FillPoints: PPointArray;
                      FillPointsCount: Longword;