From 0381a100faffe21f69ededf200d641007b4cf080 Mon Sep 17 00:00:00 2001
From: celestar <celestar@openttd.org>
Date: Fri, 28 Apr 2006 07:47:55 +0000
Subject: [PATCH] (svn r4606) -Backported r4341 from trunk: 	-(FS#101) When
 a player got bankrupt, slots were not cleared, because vehicles got deleted
 directly by DeleteVehicle

---
 vehicle.c | 1 +
 1 file changed, 1 insertion(+)

diff --git a/vehicle.c b/vehicle.c
index 1820bf81e4..4049529c0e 100644
--- a/vehicle.c
+++ b/vehicle.c
@@ -541,6 +541,7 @@ void DeleteVehicle(Vehicle *v)
 		u = v->next;
 		has_artic_part = EngineHasArticPart(v);
 		DeleteName(v->string_id);
+		if (v->type == VEH_Road) ClearSlot(v, v->u.road.slot);
 		v->type = 0;
 		UpdateVehiclePosHash(v, INVALID_COORD, 0);
 		v->next_hash = INVALID_VEHICLE;