--- a/hedgewars/uLand.pas Sat Aug 18 13:40:21 2012 +0200
+++ b/hedgewars/uLand.pas Sat Aug 18 13:45:00 2012 +0200
@@ -202,9 +202,9 @@
var pa: TPixAr;
i: Longword;
y, x: Longword;
- fps: TPointArray;
+ fps: TPointArray;
begin
- fps:=Template.FillPoints^;
+ fps:=Template.FillPoints^;
ResizeLand(Template.TemplateWidth, Template.TemplateHeight);
for y:= 0 to LAND_HEIGHT - 1 do
for x:= 0 to LAND_WIDTH - 1 do
--- a/hedgewars/uLandTemplates.pas Sat Aug 18 13:40:21 2012 +0200
+++ b/hedgewars/uLandTemplates.pas Sat Aug 18 13:45:00 2012 +0200
@@ -26,7 +26,7 @@
type TRectArray = array[0..64] of TSDL_Rect;
PRectArray = ^TRectArray;
- TPointArray = array[0..64] of TPoint;
+ TPointArray = array[0..64] of TPoint;
PPointArray = ^TPointArray;
TEdgeTemplate = record
BasePoints: PRectArray;