Possible fix for "Sent" events not logged when using TIdSSLIOHandlerSocketOpenSS

Giganews Newsgroups
Subject: Possible fix for "Sent" events not logged when using TIdSSLIOHandlerSocketOpenSS
Posted by:  Marc Aarts (marc.aar…@wanadoo.nl)
Date: Thu, 22 Jul 2004

Hello,

I have seen several posts about the "TIdSSLIOHandlerSocketOpenSSL" component
not logging the "Sent" events to a "TIdLogEvent" or "TIdLogFile" attached to
the "Intercept" property.

To cure this, I added the following bit to the
"TIdSSLIOHandlerSocketOpenSSL.WriteDirect" procedure in "IdSSLOpenSSL.pas"
after the "CheckForDisconnect;" line in that procedure:

// start
  if Intercept <> nil then begin
    Intercept.Send(ABuffer);
  end;
// end

This seems to work well, but it makes me wonder why it wasn't there in the
first place, since it is in the "TIdIOHandler.WriteDirect" event in
"IdIOHandler.pas".

Marc

Replies