From 6926bd55fd4f1d36745082b668b052c1b6691ad8 Mon Sep 17 00:00:00 2001
From: celestar <celestar@openttd.org>
Date: Sun, 9 Apr 2006 18:35:24 +0000
Subject: (svn r4341) -Fix (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 5b0d9a960..4f1894322 100644
--- a/vehicle.c
+++ b/vehicle.c
@@ -548,6 +548,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->type = 0;
 		UpdateVehiclePosHash(v, INVALID_COORD, 0);
 		v->next_hash = INVALID_VEHICLE;
-- 
cgit v1.2.3-70-g09d2