diff -r 2fa92e9a0acf -r ac2cb3b99d70 hedgewars/uGears.pas --- a/hedgewars/uGears.pas Sun Dec 26 18:56:31 2010 +0300 +++ b/hedgewars/uGears.pas Sun Dec 26 11:17:01 2010 -0500 @@ -1122,8 +1122,11 @@ cArtillery:= true; if not hasBorder and ((Theme = 'Snow') or (Theme = 'Christmas')) then + begin for i:= 0 to Pred(vobCount*2) do AddGear(GetRandom(LAND_WIDTH+1024)-512, LAND_HEIGHT - GetRandom(1024), gtFlake, 0, _0, _0, 0); + disableLandBack:= true + end end; procedure doMakeExplosion(X, Y, Radius: LongInt; Mask: LongWord);