275
@verb #2463:"@cleanup" this none none rdo #6319
@program #2463:"@cleanup" this none none
player:tell("Cleaning up...")
for x in (this.contents)
  if (x.owner != this.owner)
    if (x.owner == $repo_man)
      if (x:isa($player))
        move(x, $repo_man.graveyard)
      else
        move(x, $repo_man.box)
      endif
    elseif (x:isa($player))
      $housekeeper:cart_player(x)
    else
      $postman:queue_delivery(x, x.owner, $housekeeper, this)
    endif
    $command_utils:suspend_if_needed()
  endif
endfor
player:tell("Done.")
"Last modified by Raptor (#6319) on Fri Feb 13 03:04:18 1998 EST."
.

0