hedgewars/uGears.pas
changeset 9768 08799c901a42
parent 9764 8dc9d268330f
child 9777 984b0f2cdf67
--- a/hedgewars/uGears.pas	Sun Dec 08 13:49:11 2013 -0500
+++ b/hedgewars/uGears.pas	Sun Dec 08 16:04:40 2013 -0500
@@ -624,7 +624,7 @@
 snowRight:= max(LAND_WIDTH,4096)+512;
 snowLeft:= -(snowRight-LAND_WIDTH);
 
-if (not hasBorder) and ((Theme = 'Snow') or (Theme = 'Christmas')) then
+if (not hasBorder) and cSnow then
     for i:= vobCount * Longword(max(LAND_WIDTH,4096)) div 2048 downto 1 do
         AddGear(LongInt(GetRandom(snowRight - snowLeft)) + snowLeft, LAND_HEIGHT + LongInt(GetRandom(750)) - 1300, gtFlake, 0, _0, _0, 0);
 end;