hedgewars/uGears.pas
changeset 3946 41e06b74c991
parent 3908 1429c303858d
child 3949 4c4c0a2507cc
--- a/hedgewars/uGears.pas	Sun Oct 10 12:32:12 2010 -0400
+++ b/hedgewars/uGears.pas	Sun Oct 10 12:53:16 2010 -0400
@@ -924,7 +924,10 @@
         begin
         t^.PortalCounter:= 0;
         t:= t^.NextGear
-        end
+        end;
+   
+    if (GameFlags and gfResetWeps) <> 0 then
+        ResetWeapons
 end;
 
 procedure ApplyDamage(Gear: PGear; Damage: Longword; Source: TDamageSource);