From d830874c12008f61e11865428e14e551ce58fe4f Mon Sep 17 00:00:00 2001
From: peter1138 <peter1138@openttd.org>
Date: Wed, 8 Nov 2006 08:41:54 +0000
Subject: (svn r7110) -Fix: Do not let ships enter partial water tiles under
 bridges; they will travel up land...

---
 tunnelbridge_cmd.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/tunnelbridge_cmd.c b/tunnelbridge_cmd.c
index 2ad5ea80d..17b803628 100644
--- a/tunnelbridge_cmd.c
+++ b/tunnelbridge_cmd.c
@@ -1310,7 +1310,7 @@ static uint32 GetTileTrackStatus_TunnelBridge(TileIndex tile, TransportType mode
 				result = AxisToTrackBits(GetBridgeAxis(tile)) * 0x101;
 			}
 			if ((IsTransportUnderBridge(tile) && mode == GetTransportTypeUnderBridge(tile)) ||
-					(IsWaterUnderBridge(tile)     && mode == TRANSPORT_WATER)) {
+					(IsWaterUnderBridge(tile)     && mode == TRANSPORT_WATER && GetTileSlope(tile, NULL) == SLOPE_FLAT)) {
 				result |= AxisToTrackBits(OtherAxis(GetBridgeAxis(tile))) * 0x101;
 			}
 			return result;
-- 
cgit v1.2.3-70-g09d2