anchor.diff:  
   procedure TIRC.OnNickNameChanged(ASender: TIdContext; const AOldNickname, AHost, ANewNickname: string);
   begin
  +	FChannelList.NickName := FIdIRC.UsedNickname;
  +
     FOldNickName := AOldNickname;
     FNewNickName := ANewNickname;
     TIdSync.SynchronizeMethod(@SendNickNameChanged);
  
positive.code: 
  destructor TIRC.Destroy;
  begin
    FIdIRC.Free;
    FAutoJoinChannels.Free;
    FCommands.Free;
  
negative.code:   ConfigureEvents;
  	TIdIRCConfig.Configure(FIdIRC, FAutoJoinChannels);
   	DoConnect;
    FChannelList.NickName := FIdIRC.UsedNickname;
    AutoJoinChannels;
    TIdIRCConfig.ConfigureEncoding(FIdIRC);
  end;
  