hedgewars/uWorld.pas
changeset 13898 8c702a4839ec
parent 13814 fdae1ed9b6db
child 13983 9be2926890cd
--- a/hedgewars/uWorld.pas	Tue Oct 09 09:02:39 2018 -0400
+++ b/hedgewars/uWorld.pas	Tue Oct 09 09:58:33 2018 -0400
@@ -1692,7 +1692,7 @@
             FPS:= Frames;
             Frames:= 0;
             CountTicks:= 0;
-            s:= Format(trmsg[sidFPS], inttostr(FPS));
+            s:= Format(shortstring(trmsg[sidFPS]), inttostr(FPS));
             tmpSurface:= TTF_RenderUTF8_Blended(Fontz[fnt16].Handle, Str2PChar(s), cWhiteColorChannels);
             tmpSurface:= doSurfaceConversion(tmpSurface);
             FreeAndNilTexture(fpsTexture);