Better AI behavior
authorunc0rr
Sun, 11 Feb 2007 19:57:29 +0000 (2007-02-11)
changeset 435 25820c10c849
parent 434 2c6ccce17f39
child 436 3f806cadb4e3
Better AI behavior
hedgewars/GSHandlers.inc
hedgewars/HHHandlers.inc
--- a/hedgewars/GSHandlers.inc	Sun Feb 11 19:38:26 2007 +0000
+++ b/hedgewars/GSHandlers.inc	Sun Feb 11 19:57:29 2007 +0000
@@ -785,6 +785,7 @@
 if (Gear^.Message and gm_Destroy) > 0 then
    begin
    DeleteGear(Gear);
+   FreeActionsList;
    exit
    end;
 
--- a/hedgewars/HHHandlers.inc	Sun Feb 11 19:38:26 2007 +0000
+++ b/hedgewars/HHHandlers.inc	Sun Feb 11 19:57:29 2007 +0000
@@ -126,8 +126,7 @@
                     RenderHealth(PHedgehog(HH^.Hedgehog)^);
                     RecountTeamHealth(PHedgehog(HH^.Hedgehog)^.Team)
                     end;
-     end;
-FreeActionsList
+     end
 end;
 
 const StepTicks: LongWord = 0;