--- a/hedgewars/uGears.pas Thu Dec 23 21:45:50 2010 +0100
+++ b/hedgewars/uGears.pas Tue Dec 28 22:40:12 2010 +0100
@@ -1121,9 +1121,12 @@
if (GameFlags and gfArtillery) <> 0 then
cArtillery:= true;
-if (Theme = 'Snow') or (Theme = 'Christmas') then
+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);
@@ -1851,7 +1854,7 @@
Gear^.Text:= text;
Gear^.FrameTicks:= x
end
- else ParseCommand('say ' + text, true)
+ //else ParseCommand('say ' + text, true)
end
else if (x >= 4) then
begin