anchor.diff:  
   const
     NickNameFormat = '<%s>';
  -  MessageFormat = NickNameFormat + ': %s';
  +  MessageFormat = '%s ' + NickNameFormat + ': %s';
   
   procedure TIRC.ReadConfig;
   var
  
positive.code: 
  destructor TIRC.Destroy;
  begin
    FIdIRC.Free;
    FAutoJoinChannels.Free;
    FCommands.Free;
  
negative.code: 
  procedure TIRC.Disconnect;
  begin
    if not FIdIRC.Connected then
      Exit;
  
    FIdIRC.IOHandler.InputBuffer.Clear;
    FIdIRC.Disconnect;
  end;
  
  