hedgewars/uStore.pas
changeset 2874 3c7c2bf1ba38
parent 2873 e7acb0251a22
child 2905 f3c79f7193a9
--- a/hedgewars/uStore.pas	Fri Feb 26 16:29:00 2010 +0000
+++ b/hedgewars/uStore.pas	Fri Feb 26 19:52:22 2010 +0000
@@ -247,7 +247,11 @@
 					NameTagTex:= RenderStringTex(Name, Clan^.Color, CheckCJKFont(Name,fnt16));
 					if Hat <> 'NoHat' then
 						begin
-						texsurf:= LoadImage(Pathz[ptHats] + '/' + Hat, ifNone);
+                        texsurf:= nil;
+                        if (Length(Hat) > 39) and (Copy(Hat,1,8) = 'Reserved') and (Copy(Hat,9,32) = PlayerHash) then
+						   texsurf:= LoadImage(Pathz[ptHats] + '/Reserved/' + Copy(Hat,9,Length(s)-8), ifNone)
+                        else
+						   texsurf:= LoadImage(Pathz[ptHats] + '/' + Hat, ifNone);
 						if texsurf <> nil then
 							begin
 							HatTex:= Surface2Tex(texsurf, true);