Method code for $event_handler.clear_event_hook()

[Turn on line numbering]

---

arg event;
var o;

(> .perms(sender(), 'writer) <);
if (!hooks || !hooks.contains(event))
    return;
for o in (hooks[event])
    (| o.event_hook_removed(event) |);
hooks = dict_del(hooks, event);
if (!hooks) {
    (| clear_var('hooks) |);
    (| clear_var('hooked) |);
}

---

["// Created 16-Dec-1996 as a part of ColdCore, see: @help Credit"]