hedgewars/uStore.pas
changeset 6515 74a04089bb56
parent 6492 71db3c0daa0a
child 6580 6155187bf599
equal deleted inserted replaced
6514:8ba891d34eba 6515:74a04089bb56
   197                     begin
   197                     begin
   198                     NameTagTex:= RenderStringTex(Name, Clan^.Color, fnt16);
   198                     NameTagTex:= RenderStringTex(Name, Clan^.Color, fnt16);
   199                     if Hat <> 'NoHat' then
   199                     if Hat <> 'NoHat' then
   200                         begin
   200                         begin
   201                         if (Length(Hat) > 39) and (Copy(Hat,1,8) = 'Reserved') and (Copy(Hat,9,32) = PlayerHash) then
   201                         if (Length(Hat) > 39) and (Copy(Hat,1,8) = 'Reserved') and (Copy(Hat,9,32) = PlayerHash) then
   202                             LoadHedgehogHat(Gear, 'Reserved/' + Copy(Hat,9,Length(s)-8))
   202                             LoadHedgehogHat(Gear, 'Reserved/' + Copy(Hat,9,Length(Hat)-8))
   203                         else
   203                         else
   204                             LoadHedgehogHat(Gear, Hat);
   204                             LoadHedgehogHat(Gear, Hat);
   205                         end
   205                         end
   206                     end;
   206                     end;
   207         end;
   207         end;