Method code for $sys.spawn_selfmanager()

[Turn off line numbering]

---

  1: arg name, @writers;
  2: var obj, w;
  3: 
  4: // Differs from .spawn_sender in that the object created manages itself.  
  5: // Add to this list as necessary:
  6: (> .perms(sender(), $mail_message) <);
  7: obj = (> .create([sender()], name, this()) <);
  8: for w in (writers)
  9:     obj.add_writer(w);
 10: obj.change_manager(obj);
 11: return obj;

---

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