Skip to content
Snippets Groups Projects
Commit 0486befe authored by rswindell's avatar rswindell
Browse files

Eliminated now obsolete function: MailEditAliasListClick.

Initializes new mail_server.relay_port with default SMTP port.
parent 80f6d45a
No related branches found
No related tags found
No related merge requests found
......@@ -493,6 +493,7 @@ __fastcall TMainForm::TMainForm(TComponent* Owner)
memset(&mail_startup,0,sizeof(mail_startup));
mail_startup.size=sizeof(mail_startup);
mail_startup.smtp_port=IPPORT_SMTP;
mail_startup.relay_port=IPPORT_SMTP;
mail_startup.pop3_port=110;
mail_startup.interface_addr=INADDR_ANY;
mail_startup.lputs=mail_lputs;
......@@ -1554,20 +1555,6 @@ void __fastcall TMainForm::CtrlMenuItemEditClick(TObject *Sender)
//---------------------------------------------------------------------------
void __fastcall TMainForm::MailEditAliasListClick(TObject *Sender)
{
char filename[MAX_PATH];
sprintf(filename,"%sALIAS.CFG"
,MainForm->cfg.ctrl_dir);
Application->CreateForm(__classid(TTextFileEditForm), &TextFileEditForm);
TextFileEditForm->Filename=AnsiString(filename);
TextFileEditForm->Caption="Mail Recipient Aliases (See MAILSRVR.DOC for help)";
TextFileEditForm->ShowModal();
delete TextFileEditForm;
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::UpTimerTick(TObject *Sender)
{
char str[128];
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment