Method code for $event_handler.send_event()

[Turn on line numbering]

---

arg event, @args;
var o;

// some sort of perms checking..
if (!hooks || !hooks.contains(event))
    return;
for o in (hooks[event]) {
    if (!valid(o)) {
        hooks = dict_add(hooks, event, setremove(hooks[event], o));
        hooked = (hooked || #[]).del_elem(o, event);
    }
    (| o.event_notify(event, sender(), @args) |);
}
if (!hooked)
    (| clear_var('hooked) |);

// $#Edited: 29 Mar 97 17:12 $miro

---

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