Fix infrastructure totals when removing canals in ForceClearWaterTile

This commit is contained in:
Jonathan G Rennison
2024-06-05 19:44:04 +01:00
parent 226c3d5d17
commit 2aefeec225

View File

@@ -670,6 +670,13 @@ static CommandCost ClearTile_Water(TileIndex tile, DoCommandFlag flags)
void ForceClearWaterTile(TileIndex tile) void ForceClearWaterTile(TileIndex tile)
{ {
if (IsWaterTile(tile) && IsCanal(tile)) {
Owner owner = GetTileOwner(tile);
if (Company::IsValidID(owner)) {
Company::Get(owner)->infrastructure.water--;
DirtyCompanyInfrastructureWindows(owner);
}
}
bool remove = IsDockingTile(tile); bool remove = IsDockingTile(tile);
DoClearSquare(tile); DoClearSquare(tile);
MarkCanalsAndRiversAroundDirty(tile); MarkCanalsAndRiversAroundDirty(tile);