--- a/hedgewars/uGears.pas	Sun Oct 07 18:37:30 2018 +0200
+++ b/hedgewars/uGears.pas	Tue Oct 09 09:02:39 2018 -0400
@@ -1221,7 +1221,7 @@
                 Gear^.Text:= text;
                 Gear^.FrameTicks:= x
                 end;
-            AddChatString(#9+Format(trmsg[sidChatHog], HH^.Name, text));
+            AddChatString(#9+Format(shortstring(trmsg[sidChatHog]), HH^.Name, text));
             end
         end
     else if (x >= 4) then