[Turn off line numbering]
1: var obj;
2:
3: // Called by $sys.clean_database()
4: (> .perms(caller(), $sys) <);
5: (| ._clean_root('trusted, 'trusted_by) |);
6: (| ._clean_root('trusted_by, 'trusted) |);
7: (| ._clean_root('writers, 'writes) |);
8: (| ._clean_root('writes, 'writers) |);
9: if (!manager) {
10: manager = this();
11: .change_manager($reaper);
12: }
13: if (managed) {
14: managed = managed.valid_objects();
15: for obj in (managed) {
16: refresh();
17: if (obj.manager() != this())
18: managed = setremove(managed, obj);
19: }
20: if (!managed)
21: clear_var('managed);
22: }
["// Created as a part of ColdCore, see: @help Credit"]