Mercurial Mercurial > hedgewars / comparison
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | file | latest | revisions | annotate | diff | comparison | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
hedgewars/uGearsList.pas
changeset 10639 992863acb2b7
parent 10638 99975e1860d2
child 10641 802589828f99
equal deleted inserted replaced
10638:99975e1860d2 10639:992863acb2b7 
   725 if FollowGear = Gear then
 
   725 if FollowGear = Gear then
 
   726     FollowGear:= nil;
 
   726     FollowGear:= nil;
 
   727 if lastGearByUID = Gear then
 
   727 if lastGearByUID = Gear then
 
   728     lastGearByUID := nil;
 
   728     lastGearByUID := nil;
 
   729 if (Gear^.Hedgehog = nil) or (Gear^.Hedgehog^.GearHidden <> Gear) then // hidden hedgehogs shouldn't be in the list
 
   729 if (Gear^.Hedgehog = nil) or (Gear^.Hedgehog^.GearHidden <> Gear) then // hidden hedgehogs shouldn't be in the list
 
   730     RemoveGearFromList(Gear);
 
   730      RemoveGearFromList(Gear)
 
   731 if (Gear^.Hedgehog <> nil) and (Gear^.Hedgehog^.GearHidden = Gear) then
 
   731 else Gear^.Hedgehog^.GearHidden:= nil;
 
   732     Gear^.Hedgehog^.GearHidden:= nil;
 
       
   733 
   732 
   734 Dispose(Gear)
 
   733 Dispose(Gear)
 
   735 end;
 
   734 end;
 
   736 
   735 
   737 end.
 
   736 end.
hedgewars