Method code for $root.change_manager()

[Turn off line numbering]

---

  1: arg new;
  2: var old;
  3: 
  4: if (caller() != definer() && !$sys.is_system(sender()))
  5:     throw(~perm, "You must have system privileges to change the manager.");
  6: (> $sys.touch() <);
  7: if (type(new) != 'objnum)
  8:     throw(~invarg, "Managers must be given as a single dbref.");
  9: old = .manager();
 10: manager = new;
 11: old.del_managed_obj();
 12: new.add_managed_obj();

---

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