# HG changeset patch # User unc0rr # Date 1242837327 0 # Node ID f188ec7c450b9ed309f9e3d511d4e660b6d2ac85 # Parent 2c7353ca43c905f6c86e07140472fdee264f280b Silence useless warning diff -r 2c7353ca43c9 -r f188ec7c450b hedgewars/CCHandlers.inc --- a/hedgewars/CCHandlers.inc Tue May 19 22:48:27 2009 +0000 +++ b/hedgewars/CCHandlers.inc Wed May 20 16:35:27 2009 +0000 @@ -282,7 +282,7 @@ bShowFinger:= false; with CurrentHedgehog^.Gear^ do begin - {$IFDEF DEBUGFILE}AddFileLog('/+attack: Gear^.State = '+inttostr(State));{$ENDIF} + {$IFDEF DEBUGFILE}AddFileLog('/+attack: hedgehog''s Gear^.State = '+inttostr(State));{$ENDIF} if ((State and gstHHDriven) <> 0) then begin FollowGear:= CurrentHedgehog^.Gear; diff -r 2c7353ca43c9 -r f188ec7c450b hedgewars/uGears.pas --- a/hedgewars/uGears.pas Tue May 19 22:48:27 2009 +0000 +++ b/hedgewars/uGears.pas Wed May 20 16:35:27 2009 +0000 @@ -404,7 +404,7 @@ end; if Gear^.Kind = gtHedgehog then - if CurAmmoGear <> nil then + if (CurAmmoGear <> nil) and (CurrentHedgehog^.Gear = Gear) then begin Gear^.Message:= gm_Destroy; CurAmmoGear^.Message:= gm_Destroy;