Method code for $sys.new_admin()

[Turn on line numbering]

---

if (caller() != $admin)
    throw(~perm, "Caller is not $admin.");
admins = setadd(admins, sender());

---

// Created 27-Mar-1995 as a part of ColdCore, see: @help Credit