@verb #53:"description" this none this rxdo #55
@program #53:"description" this none this
desc = pass(@args)
running = $code_utils:task_valid(this.refkiller_task)
desc = {@desc, "The refkiller is " + (running ? "" | "not ") + "running."}
if (running)
  desc = {@desc, tostr("  Now processing ", this.last_refkilled_object:nn(), ".")}
  desc = {@desc, tostr("  ", this.last_refkilled_object in this.refkill_worklist, "/", length(this.refkill_worklist), " complete.")}
else
  desc = {@desc, tostr("There are ", length(children($trash)), " objects in the recycler.")}
  n = 0
  for x in (children($trash))
    if (x.recycled_time < this.last_complete_refkill_sweep)
      n = n + 1
    endif
  endfor
  desc = {@desc, tostr(n, " objects are ready to be recreated.")}
endif
return desc
"Last modified by whiz (#3135) on Thu Jul 19 00:05:25 2001 MDT."
"This verb previously owned by manta (#7165), and chowned to $slacker upon dewizarding (Sat Aug 17 14:50:05 2002 MDT)."
"Last modified by Dax (#789) on Sat Aug 17 14:50:05 2002 MDT."
.