From 9a364389cba7ecafd2136c996994492193c038b9 Mon Sep 17 00:00:00 2001
From: tron <tron@openttd.org>
Date: Wed, 22 Feb 2006 21:11:31 +0000
Subject: [PATCH] (svn r3653) -Fix: You didn't pay for terraforming at the end
 tile when building a tunnel

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

diff --git a/tunnelbridge_cmd.c b/tunnelbridge_cmd.c
index a8e07e7871..eb2a68518c 100644
--- a/tunnelbridge_cmd.c
+++ b/tunnelbridge_cmd.c
@@ -519,9 +519,8 @@ int32 CmdBuildTunnel(int x, int y, uint32 flags, uint32 p1, uint32 p2)
 	} else {
 		ret = DoCommandByTile(end_tile, 0, 0, flags, CMD_LANDSCAPE_CLEAR);
 		if (CmdFailed(ret)) return ret;
-		cost += ret;
 	}
-	cost += _price.build_tunnel;
+	cost += _price.build_tunnel + ret;
 
 	if (flags & DC_EXEC) {
 		SetTileType(start_tile, MP_TUNNELBRIDGE);