hedgewars/uVisualGears.pas
changeset 2376 ece7b87f1334
parent 2152 a2811690da1b
child 2428 6800f8aa0184
--- a/hedgewars/uVisualGears.pas	Thu Sep 10 15:22:34 2009 +0000
+++ b/hedgewars/uVisualGears.pas	Thu Sep 10 15:29:28 2009 +0000
@@ -166,7 +166,7 @@
 begin
 	Gear^.X:= Gear^.X + (cWindSpeed * 100 + Gear^.dX) * Steps;
 	Gear^.Y:= Gear^.Y - cDrownSpeed * Steps;
-	
+
 	if (Gear^.FrameTicks <= Steps) or (hwRound(Gear^.Y) < cWaterLine) then
 		DeleteVisualGear(Gear)
 	else
@@ -334,9 +334,9 @@
 		exit
 		end;
 
-if cReducedQuality and 
-   (Kind <> vgtTeamHealthSorter) and 
-   (Kind <> vgtSmallDamageTag) and 
+if cReducedQuality and
+   (Kind <> vgtTeamHealthSorter) and
+   (Kind <> vgtSmallDamageTag) and
    (Kind <> vgtSpeechBubble) then
 	begin
 	AddVisualGear:= nil;