--- a/hedgewars/uGears.pas Tue Dec 10 00:05:27 2013 -0500
+++ b/hedgewars/uGears.pas Tue Dec 10 00:20:53 2013 -0500
@@ -33,7 +33,7 @@
* effects are called "Visual Gears" and defined in the respective unit!
*)
interface
-uses uConsts, uFloat, uTypes;
+uses uConsts, uFloat, uTypes, uChat;
procedure initModule;
procedure freeModule;
@@ -885,7 +885,8 @@
Gear^.Text:= text;
Gear^.FrameTicks:= x
end;
- ParseCommand('/say [' + hh^.Name + '] '+text, true)
+ //ParseCommand('/say [' + hh^.Name + '] '+text, true)
+ //AddChatString(#1+'[' + HH^.Name + '] '+text);
end
end
else if (x >= 4) then