--- a/hedgewars/uGears.pas	Sun Jul 16 08:13:51 2006 +0000
+++ b/hedgewars/uGears.pas	Thu Jul 20 20:11:32 2006 +0000
@@ -590,7 +590,8 @@
               end;
          end;
       Gear:= Gear.NextGear
-      end
+      end;
+uAIMisc.AwareOfExplosion(0, 0, 0)
 end;
 
 procedure AmmoShove(Ammo: PGear; Damage, Power: integer);