hedgewars/uVisualGears.pas
changeset 6117 2a4829172a29
parent 5924 82fc26c53d2a
child 6179 b529f88d37d0
--- a/hedgewars/uVisualGears.pas	Sun Oct 09 21:47:47 2011 -0400
+++ b/hedgewars/uVisualGears.pas	Mon Oct 10 14:13:35 2011 -0400
@@ -768,7 +768,7 @@
 begin
 if (cReducedQuality and rqKillFlakes) <> 0 then exit;
 
-if ((GameFlags and gfBorder) <> 0) or ((Theme <> 'Snow') and (Theme <> 'Christmas')) then
+if hasBorder or ((Theme <> 'Snow') and (Theme <> 'Christmas')) then
     for i:= 0 to Pred(vobCount * cScreenSpace div LAND_WIDTH) do
         AddVisualGear(cLeftScreenBorder + random(cScreenSpace), random(1024+200) - 100 + LAND_HEIGHT, vgtFlake)
 else