From 42bcee22bd7d3a8582abe88e5f087b205c872505 Mon Sep 17 00:00:00 2001
From: peter1138 <peter1138@openttd.org>
Date: Wed, 9 Aug 2006 20:44:23 +0000
Subject: (svn r5819) - NewGRF: add support for refit costs specified in
 NewGRF. This may affect the default refit costs for the default rail
 vehicles.

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

(limited to 'ship_cmd.c')

diff --git a/ship_cmd.c b/ship_cmd.c
index 009d243fa..a47882f11 100644
--- a/ship_cmd.c
+++ b/ship_cmd.c
@@ -1081,7 +1081,7 @@ int32 CmdRefitShip(TileIndex tile, uint32 flags, uint32 p1, uint32 p2)
 
 	cost = 0;
 	if (IS_HUMAN_PLAYER(v->owner) && new_cid != v->cargo_type) {
-		cost = _price.ship_base >> 7;
+		cost = (EngInfo(v->engine_type)->refit_cost * _price.ship_base) >> 10;
 	}
 
 	if (flags & DC_EXEC) {
-- 
cgit v1.2.3-70-g09d2