hedgewars/uMisc.pas
changeset 6857 b34288c8fafa
parent 6843 59da15acb2f2
child 6881 ee01eeaa1281
--- a/hedgewars/uMisc.pas	Thu Apr 05 00:42:43 2012 +0400
+++ b/hedgewars/uMisc.pas	Thu Apr 05 14:50:58 2012 +0400
@@ -153,13 +153,11 @@
 {$ELSE}
 function SDL_RectMake(x, y: SmallInt; width, height: Word): TSDL_Rect;
 {$ENDIF}
-var rect: TSDL_Rect;
 begin
-    rect.x:= x;
-    rect.y:= y;
-    rect.w:= width;
-    rect.h:= height;
-    exit(rect);
+    SDL_RectMake.x:= x;
+    SDL_RectMake.y:= y;
+    SDL_RectMake.w:= width;
+    SDL_RectMake.h:= height;
 end;
 
 function GetTeamStatString(p: PTeam): shortstring;