Just for completeness, correct formatting on this probably-will-be-reverted-approach
authornemo
Wed, 27 May 2009 03:56:17 +0000
changeset 2125 3ebe8cd30b84
parent 2124 d39c61eaca15
child 2126 cb249fa8e3da
Just for completeness, correct formatting on this probably-will-be-reverted-approach
hedgewars/CCHandlers.inc
hedgewars/uChat.pas
--- a/hedgewars/CCHandlers.inc	Wed May 27 03:52:07 2009 +0000
+++ b/hedgewars/CCHandlers.inc	Wed May 27 03:56:17 2009 +0000
@@ -338,7 +338,6 @@
 SendIPC('b' + s);
 
 text:= copy(s, 2, Length(s)-1);
-text:= UserNick + ': ' + text;
 
 AddChatString(text)
 end;
--- a/hedgewars/uChat.pas	Wed May 27 03:52:07 2009 +0000
+++ b/hedgewars/uChat.pas	Wed May 27 03:56:17 2009 +0000
@@ -189,7 +189,7 @@
 if copy(s, 1, 4) = '/ts ' then
     begin
     AddFileLog('attempting teamsay: '+s);
-    ParseCommand('/teamsay ' + char(LocalClan) + copy(s, 5, Length(s)-4), true);
+    ParseCommand('/teamsay ' + char(LocalClan) + UserNick + ': '+copy(s, 5, Length(s)-4), true);
     exit
     end;
 if (s[1] = '/') and (copy(s, 1, 4) <> '/me ') then