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);

// $#Edited: 18 Jul 99 13:33 $brandon

---

["// Created 26-Mar-1995 as a part of ColdCore, see: @help Credit"]