Method code for $sys.set_deny_users()

[Turn on line numbering]

---

arg name, definer, value;

switch (value[1]) {
    case 'set:
        deny_users = value[2];
    case 'add:
        deny_users = setadd(deny_users, value[2]);
    case 'del:
        deny_users = setremove(deny_users, value[2]);
    default:
        throw(~type, "Unknown action: " + value[1]);
}

---

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