(svn r3653) -Fix: You didn't pay for terraforming at the end tile when building a tunnel

This commit is contained in:
tron
2006-02-22 21:11:31 +00:00
parent 9d4400c89f
commit c9d540c0f0

View File

@@ -519,9 +519,8 @@ int32 CmdBuildTunnel(int x, int y, uint32 flags, uint32 p1, uint32 p2)
} else { } else {
ret = DoCommandByTile(end_tile, 0, 0, flags, CMD_LANDSCAPE_CLEAR); ret = DoCommandByTile(end_tile, 0, 0, flags, CMD_LANDSCAPE_CLEAR);
if (CmdFailed(ret)) return ret; if (CmdFailed(ret)) return ret;
cost += ret;
} }
cost += _price.build_tunnel; cost += _price.build_tunnel + ret;
if (flags & DC_EXEC) { if (flags & DC_EXEC) {
SetTileType(start_tile, MP_TUNNELBRIDGE); SetTileType(start_tile, MP_TUNNELBRIDGE);