# HG changeset patch
# User unc0rr
# Date 1426625846 -10800
# Node ID bd281e854e02c284db9eb7a059fd15c04e3ba566
# Parent  6ef0fb6cd3bb935b9a3a06c352f9f025c4567c8d
Don't do anything if sorter was replaced, even for one tick only. Hopefully fixes issue #907, but not confirmed, though very highly plausible.

diff -r 6ef0fb6cd3bb -r bd281e854e02 hedgewars/uVisualGearsHandlers.pas
--- a/hedgewars/uVisualGearsHandlers.pas	Mon Mar 16 11:12:18 2015 +0300
+++ b/hedgewars/uVisualGearsHandlers.pas	Tue Mar 17 23:57:26 2015 +0300
@@ -515,7 +515,8 @@
 procedure doStepTeamHealthSorterWork(Gear: PVisualGear; Steps: Longword);
 var i, t, h: LongInt;
 begin
-for t:= 1 to min(Steps, Gear^.Timer) do
+if currsorter = Gear then
+  for t:= 1 to min(Steps, Gear^.Timer) do
     begin
     dec(Gear^.Timer);
     if (Gear^.Timer and 15) = 0 then