# HG changeset patch
# User rubidium <rubidium@openttd.org>
# Date 2011-01-09 12:17:52
# Node ID e322f047824d84259bca3ac5ac404bb3f89bbe88
# Parent  362034acab50dfb46a730248cd64fb6002020d19

(svn r21743) -Fix [FS#4386]: coast tiles weren't drawn under bridges

diff --git a/src/tunnelbridge_cmd.cpp b/src/tunnelbridge_cmd.cpp
--- a/src/tunnelbridge_cmd.cpp
+++ b/src/tunnelbridge_cmd.cpp
@@ -39,6 +39,7 @@
 #include "company_base.h"
 #include "newgrf_railtype.h"
 #include "object_base.h"
+#include "water.h"
 
 #include "table/sprites.h"
 #include "table/strings.h"
@@ -1104,7 +1105,12 @@ static void DrawTile_TunnelBridge(TileIn
 		}
 
 		if (!ice) {
-			DrawClearLandTile(ti, 3);
+			TileIndex next = ti->tile + TileOffsByDiagDir(tunnelbridge_direction);
+			if (ti->tileh != SLOPE_FLAT && ti->z == 0 && HasTileWaterClass(next) && GetWaterClass(next) == WATER_CLASS_SEA) {
+				DrawShoreTile(ti->tileh);
+			} else {
+				DrawClearLandTile(ti, 3);
+			}
 		} else {
 			DrawGroundSprite(SPR_FLAT_SNOW_DESERT_TILE + SlopeToSpriteOffset(ti->tileh), PAL_NONE);
 		}