Fix #8119: Update docking area when clearing a shore rail tile

4 years ago · 39092ee13b
parent d6a995fc2e
commit 39092ee13b
1 changed files with 5 additions and 1 deletions
--- a/src/rail_cmd.cpp
+++ b/src/rail_cmd.cpp
@ -1850,7 +1850,11 @@ static CommandCost ClearTile_Track(TileIndex tile, DoCommandFlag flags)
 				if (ret.Failed()) return ret;

 				/* The track was removed, and left a coast tile. Now also clear the water. */
-				if (flags & DC_EXEC) DoClearSquare(tile);
+				if (flags & DC_EXEC) {
+					bool remove = IsDockingTile(tile);
+					DoClearSquare(tile);
+					if (remove) RemoveDockingTile(tile);
+				}
 				cost.AddCost(_price[PR_CLEAR_WATER]);
 			}