Method code for $smtp.add_mail_alias()

[Turn off line numbering]

  1: arg alias, recip;
  2: var name;
  3: 
  4: if (type(alias) != 'string)
  5:     throw(~type, "First argument must be a string name for the alias");
  6: if (type(recip) != 'objnum || !recip.is($mail_list))
  7:     throw(~type, "Second argument is not a valid $mail_list");
  8: name = alias;
  9: name = strsed(alias, "[^a-z0-9\.-]+", "", "g");
 10: if (name != alias)
 11:     throw(~type, "Alias may only be alphanumeric characters, or a period or dash");
 12: mail_aliases = dict_add(mail_aliases, alias, recip);

// Created 13-Oct-1996 as a part of ColdCore, see: @help Credit

Tlon