--- a/hedgewars/uGears.pas	Wed Nov 16 18:06:02 2016 +0100
+++ b/hedgewars/uGears.pas	Wed Nov 16 12:26:26 2016 -0500
@@ -336,7 +336,7 @@
 
                     ChangeToSDClouds;
                     ChangeToSDFlakes;
-                    SetSkyColor(SDSkyColor.r * (SDTint/255) / 255, SDSkyColor.g * (SDTint/255) / 255, SDSkyColor.b * (SDTint/255) / 255);
+                    SetSkyColor(SDSkyColor.r * (SDTint.r/255) / 255, SDSkyColor.g * (SDTint.r/255) / 255, SDSkyColor.b * (SDTint.b/255) / 255);
                     Ammoz[amTardis].SkipTurns:= 9999;
                     Ammoz[amTardis].Probability:= 0;
                     end;