From da754951f1895290d965544bac13219f38b51136 Mon Sep 17 00:00:00 2001
From: frosch <frosch@openttd.org>
Date: Thu, 24 Jan 2008 14:57:43 +0000
Subject: [PATCH] (svn r11974) -Fix [FS#1684]: Shore and sea tiles under
 bridges were converted to canals in old savegames.

---
 src/openttd.cpp | 10 +++++++++-
 1 file changed, 9 insertions(+), 1 deletion(-)

diff --git a/src/openttd.cpp b/src/openttd.cpp
index 7681a27d74..736acb978a 100644
--- a/src/openttd.cpp
+++ b/src/openttd.cpp
@@ -1710,7 +1710,15 @@ bool AfterLoadGame()
 						if (GB(_m[t].m5, 3, 2) == 0) {
 							MakeClear(t, CLEAR_GRASS, 3);
 						} else {
-							MakeCanal(t, (GetTileOwner(t) == OWNER_WATER) ? OWNER_NONE : GetTileOwner(t), Random());
+							if (GetTileSlope(t, NULL) != SLOPE_FLAT) {
+								MakeShore(t);
+							} else {
+								if (GetTileOwner(t) == OWNER_WATER) {
+									MakeWater(t);
+								} else {
+									MakeCanal(t, GetTileOwner(t), Random());
+								}
+							}
 						}
 					}
 					SetBridgeMiddle(t, axis);