# HG changeset patch
# User sheepluva
# Date 1416358847 -3600
# Node ID dbbe2f6c0a96eb495c11b1599bfffb22548f54e1
# Parent  e2aee295cb166102fb45f0e370938182ebc9ba58
make gear ability to speak somewhat less ironic

diff -r e2aee295cb16 -r dbbe2f6c0a96 hedgewars/uGearsList.pas
--- a/hedgewars/uGearsList.pas	Wed Nov 19 01:36:59 2014 +0100
+++ b/hedgewars/uGearsList.pas	Wed Nov 19 02:00:47 2014 +0100
@@ -156,7 +156,7 @@
 
 function AddGear(X, Y: LongInt; Kind: TGearType; State: Longword; dX, dY: hwFloat; Timer: LongWord): PGear;
 var gear: PGear;
-    c: byte;
+    //c: byte;
 begin
 inc(GCounter);
 
diff -r e2aee295cb16 -r dbbe2f6c0a96 hedgewars/uScript.pas
--- a/hedgewars/uScript.pas	Wed Nov 19 01:36:59 2014 +0100
+++ b/hedgewars/uScript.pas	Wed Nov 19 02:00:47 2014 +0100
@@ -1237,9 +1237,9 @@
             vgear:= AddVisualGear(0, 0, vgtSpeechBubble, s, true);
             if vgear <> nil then
                begin
+               vgear^.Text:= lua_tostring(L, 2);
                if Gear^.Kind = gtHedgehog then
                    begin
-                   vgear^.Text:= lua_tostring(L, 2);
                    AddChatString(#1+'[' + gear^.Hedgehog^.Name + '] '+vgear^.text);
                    vgear^.Hedgehog:= gear^.Hedgehog
                    end