Method code for $event_handler.hook_into_event()

[Turn off line numbering]

---

  1: arg event;
  2: 
  3: if (!hooks)
  4:     hooks = #[];
  5: (> .will_hook(event, sender()) <);
  6: hooks = dict_add(hooks, event, setadd((| hooks[event] |) || [], sender()));
  7: hooked = (hooked || #[]).setadd_elem(sender(), event);
  8: (| .did_hook(event, sender()) |);

---

// Created 17-Dec-1996 as a part of ColdCore, see: @help Credit