Method code for $root.set_method_flags()

[Turn on line numbering]

---

arg method, flags;
var current;

if (!.is_writable_by(sender()))
    throw(~perm, sender() + " cannot write to " + this());
(> $sys.touch() <);
current = method_flags(method);
if (('locked in flags && !('locked in current)) && !$sys.is_system(sender()))
    throw(~perm, "Only administrators can set the locked method flag.");
if (('nooverride in flags && !('nooverride in current)) && !$sys.is_system(sender()))
    throw(~perm, "Only administrators can set the nooverride method flag.");
return set_method_flags(method, flags);

---

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