anchor.diff:    IdIOHandlerSocket, IdIOHandlerStack, IdSSL, IdSSLOpenSSL, IdSASLLogin,
     IdSASL_CRAM_SHA1, IdSASL, IdSASLUserPass, IdSASL_CRAMBase, IdSASL_CRAM_MD5,
     IdSASLSKey, IdSASLPlain, IdSASLOTP, IdSASLExternal, IdSASLDigest,
  -  IdSASLAnonymous, IdUserPassProvider;
  +  IdSASLAnonymous, IdUserPassProvider,
  +  mLog;
   
   
   type
  
positive.code:   Result := not error;
  end;
  
  end.
  
negative.code:           begin
              aErrorMessage:= e.Message;
              error := true;
              logger.Error(e.Message);
            end;
          end;
        end;
  