Method code for $foundation.msg_definer()

[Turn on line numbering]

---

arg name;
var a;

for a in (ancestors()) {
    if (a == definer())
        break;
    catch any {
        if ((a.defined_msgs())[name])
            return a;
    }
}
throw(~invmsg, "Message \"" + name + "\" is not defined.");

---

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