diff --git a/src/SendEmail.pas b/src/SendEmail.pas index 6cc272a..fed07e2 100644 --- a/src/SendEmail.pas +++ b/src/SendEmail.pas @@ -139,11 +139,11 @@ constructor TSendEmail.Create; with FIdSMTP do begin - MailAgent := 'SendEmail-https://github.com/dliocode/sendemail'; + MailAgent := 'SendEmail'; ConnectTimeout := 60000; ReadTimeout := 60000; UseEhlo := True; - HeloName := 'SendEmail-https://github.com/dliocode/sendemail'; + HeloName := 'SendEmail'; OnStatus := LogSMTPStatus; OnWorkBegin := WorkBegin; OnWork := Work;