Method code for $smtp.remove_aliases()

[Turn on line numbering]

---

var x;

(> .perms(caller(), $mail_list) <);
for x in (mail_aliases) {
    if (x[2] == sender())
        mail_aliases = dict_del(mail_aliases, x[1]);
}

---

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