# HG changeset patch
# User smaxx
# Date 1280933655 -7200
# Node ID 958eeaf847148d85d0f0ad38afb8d5171b15d5bd
# Parent  eadebe4c45c98e3ca6151b78e13864260cfbf753
Engine:
* Updated some script calls to ensure all gears are set to active (e.g. if some gear is moved).

diff -r eadebe4c45c9 -r 958eeaf84714 hedgewars/uScript.pas
--- a/hedgewars/uScript.pas	Wed Aug 04 15:57:27 2010 +0200
+++ b/hedgewars/uScript.pas	Wed Aug 04 16:54:15 2010 +0200
@@ -363,7 +363,11 @@
     else
         begin
         gear:= GearByUID(lua_tointeger(L, 1));
-        if gear <> nil then gear^.Health:= lua_tointeger(L, 2)
+        if gear <> nil then
+            begin
+            gear^.Health:= lua_tointeger(L, 2);
+            SetAllToActive;
+            end
         end;
     lc_sethealth:= 0
 end;
@@ -393,7 +397,11 @@
     else
         begin
         gear:= GearByUID(lua_tointeger(L, 1));
-        if gear <> nil then gear^.State:= lua_tointeger(L, 2)
+        if gear <> nil then
+            begin
+            gear^.State:= lua_tointeger(L, 2);
+            SetAllToActive;
+            end
         end;
     lc_setstate:= 0
 end;
@@ -426,7 +434,11 @@
     else
         begin
         gear:= GearByUID(lua_tointeger(L, 1));
-        if gear <> nil then gear^.Tag:= lua_tointeger(L, 2)
+        if gear <> nil then
+            begin
+            gear^.Tag:= lua_tointeger(L, 2);
+            SetAllToActive;
+            end
         end;
     lc_settag:= 0
 end;
@@ -540,6 +552,7 @@
             y:= lua_tointeger(L, 3);
             gear^.X:= int2hwfloat(x);
             gear^.Y:= int2hwfloat(y);
+            SetAllToActive;
             end
         end;
     lc_setgearposition:= 0