hedgewars/uGears.pas
changeset 7667 4346566c5a58
parent 7666 8212121cf6a1
child 7669 a85e1c167b69
--- a/hedgewars/uGears.pas	Tue Sep 04 12:34:00 2012 +0200
+++ b/hedgewars/uGears.pas	Tue Sep 04 12:43:55 2012 +0200
@@ -299,8 +299,8 @@
             AddGear(0, 0, gtWaterUp, 0, _0, _0, 0)^.Tag:= cWaterRise;
         inc(step)
         end
-    else
-        inc(step);
+    else // since we are not raising the water, a second win-check isn't needed
+        inc(step,2);
     stChWin2:
         begin
         CheckForWin;