hedgewars/uStore.pas
changeset 5654 1cb68f420aa6
parent 5608 1e5d925dde9d
child 5660 1647244b3ffe
--- a/hedgewars/uStore.pas	Mon Aug 22 10:56:19 2011 -0400
+++ b/hedgewars/uStore.pas	Mon Aug 22 15:35:37 2011 -0400
@@ -1029,8 +1029,12 @@
     SetupOpenGL();
     if reinit then
         begin
+        if ((cReducedQuality and rqNoBackground) = 0) then 
+             glClearColor(SkyColor.r / 255, SkyColor.g / 255, SkyColor.b / 255, 0.99)
+        else glClearColor(RQSkyColor.r / 255, RQSkyColor.g / 255, RQSkyColor.b / 255, 0.99);
         StoreRelease(true);
         StoreLoad(true);
+        ResetLand;
         UpdateLandTexture(0, LAND_WIDTH, 0, LAND_HEIGHT)
         end;
 end;