hedgewars/uWorld.pas
changeset 10139 9046f69dae4c
parent 10124 aabd1b75d5a3
child 10141 3be894730bd6
--- a/hedgewars/uWorld.pas	Thu Feb 13 23:53:47 2014 +0400
+++ b/hedgewars/uWorld.pas	Fri Feb 14 13:48:14 2014 +0400
@@ -429,6 +429,8 @@
     AMRect: TSDL_Rect;
 {$IFDEF USE_AM_NUMCOLUMN}tmpsurf: PSDL_Surface;{$ENDIF}
 begin
+    if cOnlyStats then exit(false);
+
     SlotsNum:= 0;
     for i:= 0 to cMaxSlotIndex do
         if((i = 0) and (Ammo^[i,1].Count > 0)) or ((i <> 0) and (Ammo^[i,0].Count > 0)) then
@@ -1971,6 +1973,8 @@
 procedure ShowMission(caption, subcaption, text: ansistring; icon, time : LongInt);
 var r: TSDL_Rect;
 begin
+if cOnlyStats then exit;
+
 r.w:= 32;
 r.h:= 32;