hedgewars/uStore.pas
changeset 3897 27e115fa1143
parent 3895 e7c202c08ac1
child 3906 c5da430cb3fd
--- 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);