--- a/hedgewars/uIO.pas	Fri Mar 06 21:24:21 2015 +0100
+++ b/hedgewars/uIO.pas	Sun Mar 08 01:04:41 2015 +0100
@@ -138,6 +138,7 @@
 case s[1] of
      '!': begin AddFileLog('Ping? Pong!'); isPonged:= true; end;
      '?': SendIPC(_S'!');
+     'P': ChatPasteBuffer:= copy(s, 2, Length(s) - 1);
      'e': ParseCommand(copy(s, 2, Length(s) - 1), true);
      'E': OutError(copy(s, 2, Length(s) - 1), true);
      'W': OutError(copy(s, 2, Length(s) - 1), false);