From e88ff7e96b972d61df9fc36b7327fa9bd87bbf80 Mon Sep 17 00:00:00 2001
From: rubidium <rubidium@openttd.org>
Date: Sat, 26 May 2007 20:30:40 +0000
Subject: (svn r9940) -Fix [FS#805]: upgrading a bridge removed roadtypes.

---
 src/tunnelbridge_cmd.cpp | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/src/tunnelbridge_cmd.cpp b/src/tunnelbridge_cmd.cpp
index 9f22ce156..8c2ee05cd 100644
--- a/src/tunnelbridge_cmd.cpp
+++ b/src/tunnelbridge_cmd.cpp
@@ -304,6 +304,9 @@ int32 CmdBuildBridge(TileIndex end_tile, uint32 flags, uint32 p1, uint32 p2)
 		cost = (bridge_len + 1) * _price.clear_bridge; // The cost of clearing the current bridge.
 		replace_bridge = true;
 		replaced_bridge_type = GetBridgeType(tile_start);
+
+		/* Do not remove road types when upgrading a bridge */
+		roadtypes |= GetRoadTypes(tile_start);
 	} else {
 		/* Build a new bridge. */
 
-- 
cgit v1.2.3-70-g09d2