# HG changeset patch
# User koda
# Date 1285193356 -7200
# Node ID 27e115fa1143e0fec368630013f1ebe8a4e1d981
# Parent  e7c202c08ac1690bbf4c6698144c2a22c8ad110a
captions are scaled down when they're bigger than screen

diff -r e7c202c08ac1 -r 27e115fa1143 hedgewars/uStore.pas
--- a/hedgewars/uStore.pas	Wed Sep 22 23:46:38 2010 +0200
+++ b/hedgewars/uStore.pas	Thu Sep 23 00:09:16 2010 +0200
@@ -738,7 +738,7 @@
         scale:= cScreenWidth / (Source^.w + 20)
     else
         scale:= 1.0;
-    DrawTexture(X - round((Source^.w * scale) div 2, Top, Source, scale)
+    DrawTexture(X - round(Source^.w * scale) div 2, Top, Source, scale)
 end;
 
 procedure DrawHedgehog(X, Y: LongInt; Dir: LongInt; Pos, Step: LongWord; Angle: real);