--- a/hedgewars/uAIMisc.pas	Sat May 04 21:40:52 2013 -0400
+++ b/hedgewars/uAIMisc.pas	Sat May 04 21:56:04 2013 -0400
@@ -489,6 +489,7 @@
     Point.y:= hwRound(Me^.Y);
     skip:= false;
     matters:= true;
+    Kind:= gtHedgehog;
     Score:= - ThinkingHH^.Health
     end;
 // rate explosion
@@ -660,6 +661,7 @@
     Point.y:= hwRound(Me^.Y);
     skip:= false;
     matters:= true;
+    Kind:= gtHedgehog;
     Score:= - ThinkingHH^.Health
     end;
 // rate shot