Method code for $event_handler.event_notify()

[Turn off line numbering]

---

  1: arg event, origin, @args;
  2: 
  3: if (caller() != $event_handler)
  4:     throw(~perm, caller() + " is not $event_handler.");

---

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