Fix infrastructure totals when removing canals in ForceClearWaterTile

2024-06-05 19:44:04 +01:00
parent 226c3d5d17
commit 2aefeec225
1 changed files with 7 additions and 0 deletions
--- a/src/water_cmd.cpp
+++ b/src/water_cmd.cpp
@@ -670,6 +670,13 @@ static CommandCost ClearTile_Water(TileIndex tile, DoCommandFlag flags)

 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);
 	DoClearSquare(tile);
 	MarkCanalsAndRiversAroundDirty(tile);