hedgewars/uAmmos.pas
changeset 6622 01889d5bc79b
parent 6580 6155187bf599
child 6624 e049b5bb0ad1
equal deleted inserted replaced
6621:cc94940fe438 6622:01889d5bc79b
   378             Gear^.State:= Gear^.State and not gstHHChooseTarget;
   378             Gear^.State:= Gear^.State and not gstHHChooseTarget;
   379             isCursorVisible:= false
   379             isCursorVisible:= false
   380             end;
   380             end;
   381         end
   381         end
   382     end;
   382     end;
       
   383 AmmoMenuInvalidated:= true;
   383 end;
   384 end;
   384 
   385 
   385 procedure SwitchNotHeldAmmo(var Hedgehog: THedgehog);
   386 procedure SwitchNotHeldAmmo(var Hedgehog: THedgehog);
   386 begin
   387 begin
   387 with Hedgehog do
   388 with Hedgehog do