--- a/src/road_cmd.cpp	Sat Dec 08 18:53:49 2007 +0000
+++ b/src/road_cmd.cpp	Sat Dec 08 19:53:30 2007 +0000
@@ -606,7 +606,7 @@
 		VehicleFromPos(tile, &tile, UpdateTrainPowerProc);
 	}
 
-	return CommandCost(RailBuildCost(totype) / 2);
+	return CommandCost(RailConvertCost(GetRailType(tile), totype));
 }