# HG changeset patch # User unc0rr # Date 1388957793 -14400 # Node ID fac73b8a52d3c8a30e25133837509762f7432a56 # Parent 5a222923c8f85214d377baa44484bd38f6b5e74b Fix doStepHandlers confusion diff -r 5a222923c8f8 -r fac73b8a52d3 hedgewars/uVisualGearsHandlers.pas --- a/hedgewars/uVisualGearsHandlers.pas Sun Jan 05 23:58:13 2014 +0400 +++ b/hedgewars/uVisualGearsHandlers.pas Mon Jan 06 01:36:33 2014 +0400 @@ -32,7 +32,7 @@ interface uses uTypes; -var doStepHandlers: array[TVisualGearType] of TVGearStepProcedure; +var doStepVGHandlers: array[TVisualGearType] of TVGearStepProcedure; procedure doStepFlake(Gear: PVisualGear; Steps: Longword); procedure doStepBeeTrace(Gear: PVisualGear; Steps: Longword); @@ -921,7 +921,7 @@ procedure initModule; begin - doStepHandlers:= handlers + doStepVGHandlers:= handlers end; end. diff -r 5a222923c8f8 -r fac73b8a52d3 hedgewars/uVisualGearsList.pas --- a/hedgewars/uVisualGearsList.pas Sun Jan 05 23:58:13 2014 +0400 +++ b/hedgewars/uVisualGearsList.pas Mon Jan 06 01:36:33 2014 +0400 @@ -84,7 +84,7 @@ gear^.X:= real(X); gear^.Y:= real(Y); gear^.Kind := Kind; -gear^.doStep:= doStepHandlers[Kind]; +gear^.doStep:= doStepVGHandlers[Kind]; gear^.State:= 0; gear^.Tint:= $FFFFFFFF; gear^.uid:= VGCounter;