# HG changeset patch
# User nemo
# Date 1289582738 18000
# Node ID 1766fbab35d869702ec90d5f1552959d38c9dbf9
# Parent  e78cb3eb228ed8259835d685c73c5a7bc996a87b
Switch to Damage - Tag is already in use

diff -r e78cb3eb228e -r 1766fbab35d8 hedgewars/GSHandlers.inc
--- a/hedgewars/GSHandlers.inc	Fri Nov 12 12:21:40 2010 -0500
+++ b/hedgewars/GSHandlers.inc	Fri Nov 12 12:25:38 2010 -0500
@@ -4044,9 +4044,9 @@
     else
         begin
         i:= Gear^.Health div 5;
-        if i <> Gear^.Tag then
+        if i <> Gear^.Damage then
             begin
-            Gear^.Tag:= i;
+            Gear^.Damage:= i;
             if Gear^.Tex <> nil then FreeTexture(Gear^.Tex);
             Gear^.Tex := RenderStringTex(trmsg[sidFuel] + ': ' + inttostr(i) +
                          '%', cWhiteColor, fntSmall)
diff -r e78cb3eb228e -r 1766fbab35d8 hedgewars/uGears.pas
--- a/hedgewars/uGears.pas	Fri Nov 12 12:21:40 2010 -0500
+++ b/hedgewars/uGears.pas	Fri Nov 12 12:25:38 2010 -0500
@@ -531,7 +531,7 @@
                 gear^.Tag:= 10;
                 gear^.Timer:= 10;
                 gear^.Health:= 500;
-                gear^.Tag:= 100;
+                gear^.Damage:= 100;
                 end;
  gtPoisonCloud: begin
                 gear^.Timer:= 5000;