hedgewars/uLand.pas
changeset 2981 d0471586a616
parent 2948 3f21a9dc93d0
child 3017 4a52e0705011
--- a/hedgewars/uLand.pas	Fri Mar 12 20:36:12 2010 +0000
+++ b/hedgewars/uLand.pas	Sat Mar 13 14:19:34 2010 +0000
@@ -37,6 +37,7 @@
     LandDirty: TDirtyTag;
     hasBorder: boolean; 
     hasGirders: boolean;  
+    isMap: boolean;  
     playHeight, playWidth, leftX, rightX, topY, MaxHedgehogs: Longword;  // idea is that a template can specify height/width.  Or, a map, a height/width by the dimensions of the image.  If the map has pixels near top of image, it triggers border.
     LandBackSurface: PSDL_Surface;
 
@@ -722,6 +723,7 @@
     s: shortstring;
     f: textfile;
 begin
+isMap:= true;
 WriteLnToConsole('Loading land from file...');
 AddProgress;
 tmpsurf:= LoadImage(Pathz[ptMapCurrent] + '/map', ifAlpha or ifCritical or ifTransparent or ifIgnoreCaps);
@@ -762,7 +764,7 @@
 hasBorder:= false;
 
 LoadThemeConfig;
-
+isMap:= false;
 if (GameFlags and gfForts) = 0 then
    if Pathz[ptMapCurrent] <> '' then LoadMap
                                 else GenLandSurface