Method code for $smtp.remove_aliases()

[Turn off line numbering]

---

  1: var x;
  2: 
  3: (> .perms(caller(), $mail_list) <);
  4: for x in (mail_aliases) {
  5:     if (x[2] == sender())
  6:         mail_aliases = dict_del(mail_aliases, x[1]);
  7: }

---

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