--- a/hedgewars/uAI.pas	Tue Feb 13 21:22:00 2007 +0000
+++ b/hedgewars/uAI.pas	Wed Feb 14 20:05:20 2007 +0000
@@ -43,6 +43,9 @@
    ThinkThread:= nil
    end;
 
+   with CurrentTeam^.Hedgehogs[CurrentTeam^.CurrHedgehog] do
+     if Gear <> nil then Gear^.Message:= 0;
+     
 BestActions.Count:= 0;
 BestActions.Pos:= 0
 end;