(svn r19316) -Fix (r19186): Give correct error when failing to flatten land.
This commit is contained in:
@@ -385,7 +385,7 @@ CommandCost CmdLevelLand(TileIndex tile, DoCommandFlag flags, uint32 p1, uint32
|
|||||||
uint curh = TileHeight(tile);
|
uint curh = TileHeight(tile);
|
||||||
while (curh != h) {
|
while (curh != h) {
|
||||||
CommandCost ret = DoCommand(tile, SLOPE_N, (curh > h) ? 0 : 1, flags & ~DC_EXEC, CMD_TERRAFORM_LAND);
|
CommandCost ret = DoCommand(tile, SLOPE_N, (curh > h) ? 0 : 1, flags & ~DC_EXEC, CMD_TERRAFORM_LAND);
|
||||||
if (ret.Failed()) break;
|
if (ret.Failed()) return (cost.GetCost() == 0) ? ret : cost;
|
||||||
|
|
||||||
if (flags & DC_EXEC) {
|
if (flags & DC_EXEC) {
|
||||||
money -= ret.GetCost();
|
money -= ret.GetCost();
|
||||||
|
Reference in New Issue
Block a user