hedgewars/GSHandlers.inc
changeset 5357 ec36f3d53f3c
parent 5354 e121d0d6823b
child 5366 bfdd925e89a5
--- a/hedgewars/GSHandlers.inc	Thu Jun 30 14:28:13 2011 +0400
+++ b/hedgewars/GSHandlers.inc	Thu Jun 30 15:09:10 2011 +0400
@@ -1079,15 +1079,6 @@
             AddCaption(trmsg[sidStartFight], cWhiteColor, capgrpGameState);
             end
         end;
-    gtATSmoothWindCh: 
-        begin
-        if Gear^.Timer = 0 then
-        begin
-            if WindBarWidth < Gear^.Tag then inc(WindBarWidth)
-            else if WindBarWidth > Gear^.Tag then dec(WindBarWidth);
-            if WindBarWidth <> Gear^.Tag then Gear^.Timer := 10;
-        end
-        end;
     gtATFinishGame: 
         begin
             AllInactive := false;