hedgewars/CCHandlers.inc
changeset 4099 af612377fcba
parent 3969 5f4ef3db0a65
child 4208 dd54999c2822
--- a/hedgewars/CCHandlers.inc	Wed Nov 03 00:48:42 2010 +0100
+++ b/hedgewars/CCHandlers.inc	Wed Nov 03 16:29:17 2010 +0100
@@ -170,6 +170,7 @@
     else CurrentHedgehog^.AmmoStore:= TeamsCount - 1;
     CurrentHedgehog^.Gear:= Gear;
     CurrentHedgehog^.Name:= id;
+    CurrentHedgehog^.InitialHealth:= Gear^.Health;
     CurrHedgehog:= HedgehogsNumber;
     inc(HedgehogsNumber)
     end