Method code for $root.clear_variable()

[Turn on line numbering]

---

arg name;
var n, obj;

(> .perms(sender()) <);
n = tosym("_clear_var_" + tostr(time()));
catch any {
    .add_method(["clear_var(" + toliteral(name) + ");"], n);
    for obj in (.descendants()) {
        (| obj.(n)() |);
        pause();
    }
    (| del_method(n) |);
} with {
    (| del_method(n) |);
}

---

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