ship_cmd.c
changeset 2854 b3527fde3ff7
parent 2819 f25fb6ee397f
child 2916 b687477adcba
equal deleted inserted replaced
2853:06166c1df3d6 2854:b3527fde3ff7
   825 	Vehicle *v;
   825 	Vehicle *v;
   826 	UnitID unit_num;
   826 	UnitID unit_num;
   827 	TileIndex tile = TileVirtXY(x, y);
   827 	TileIndex tile = TileVirtXY(x, y);
   828 	Engine *e;
   828 	Engine *e;
   829 
   829 
   830 	if (!IsEngineBuildable(p1, VEH_Ship)) return CMD_ERROR;
   830 	if (!IsEngineBuildable(p1, VEH_Ship)) return_cmd_error(STR_ENGINE_NOT_BUILDABLE);
   831 
   831 
   832 	SET_EXPENSES_TYPE(EXPENSES_NEW_VEHICLES);
   832 	SET_EXPENSES_TYPE(EXPENSES_NEW_VEHICLES);
   833 
   833 
   834 	value = EstimateShipCost(p1);
   834 	value = EstimateShipCost(p1);
   835 	if (flags & DC_QUERY_COST) return value;
   835 	if (flags & DC_QUERY_COST) return value;