Method code for $sys.del_from_system()

[Turn on line numbering]

---

arg obj;

if (!.is_admin(sender()))
    throw(~perm, "Sender is not an admin.");
if (!(obj in admins || obj in agents))
    throw(~perm, "Object is not an agent or admin.");
system = setremove(system, obj);

---

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