hedgewars/uStore.pas
changeset 10644 3b8290381fcb
parent 10640 efa069762cb2
child 10735 42af3bfc832c
--- a/hedgewars/uStore.pas	Mon Dec 08 15:02:43 2014 -0500
+++ b/hedgewars/uStore.pas	Mon Dec 08 21:57:06 2014 +0100
@@ -96,6 +96,9 @@
 procedure InitZoom(zoom: real);
 begin
     SetScale(zoom);
+    // make sure view limits are updated
+    // because SetScale() doesn't do it, if zoom=cScaleFactor
+    updateViewLimits();
 end;
 
 function WriteInRect(Surface: PSDL_Surface; X, Y: LongInt; Color: LongWord; Font: THWFont; s: PChar): TSDL_Rect;