Mercurial Mercurial > hedgewars / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
oh yeah, these too
authornemo
Thu, 19 Jul 2012 20:34:21 -0400
changeset 7401 4c3ec3dca0c7
parent 7400 09427dbec1d8
child 7402 d5a710b3a2d7
oh yeah, these too
hedgewars/uScript.pas file | annotate | diff | comparison | revisions 
--- a/hedgewars/uScript.pas	Thu Jul 19 17:34:18 2012 -0400
+++ b/hedgewars/uScript.pas	Thu Jul 19 20:34:21 2012 -0400
@@ -983,8 +983,7 @@
             prevgear^.Active := false;
             prevgear^.State:= prevgear^.State and not gstHHDriven;
             prevgear^.Z := cHHZ;
-            RemoveGearFromList(prevgear);
-            InsertGearToList(prevgear);
+            prevgear^.Message:= prevgear^.Message or gmRemoveFromList or gmAddToList;
             
             SwitchCurrentHedgehog(gear^.Hedgehog);
             CurrentTeam:= CurrentHedgehog^.Team;
@@ -992,8 +991,7 @@
             gear^.State:= gear^.State or gstHHDriven;
             gear^.Active := true;
             gear^.Z := cCurrHHZ;
-            RemoveGearFromList(gear);
-            InsertGearToList(gear);
+            gear^.Message:= gear^.Message or gmRemoveFromList or gmAddToList;
             end
         end;
     lc_switchhog:= 0
hedgewars