hedgewars/uLand.pas
changeset 3287 4f7b57ed18b6
parent 3242 d8adb26ea6a9
child 3365 37ac593e9027
equal deleted inserted replaced
3286:42bb751cb0ed 3287:4f7b57ed18b6
  1268         end;
  1268         end;
  1269     end;
  1269     end;
  1270 
  1270 
  1271 if (GameFlags and gfDisableGirders) <> 0 then hasGirders:= false;
  1271 if (GameFlags and gfDisableGirders) <> 0 then hasGirders:= false;
  1272 
  1272 
  1273 if ((GameFlags and gfForts) = 0) and (Pathz[ptMapCurrent] = '') then AddObjects;
  1273 if ((GameFlags and gfForts) = 0)
       
  1274     and ((GameFlags and gfDisableLandObjects) = 0)
       
  1275     and (Pathz[ptMapCurrent] = '')
       
  1276     then AddObjects;
  1274 
  1277 
  1275 FreeLandObjects;
  1278 FreeLandObjects;
  1276 
  1279 
  1277 UpdateLandTexture(0, LAND_WIDTH, 0, LAND_HEIGHT);
  1280 UpdateLandTexture(0, LAND_WIDTH, 0, LAND_HEIGHT);
  1278 end;
  1281 end;