@verb #9613:"pop" none none none rdo #9613
@program #9613:"pop" none none none
for x in ($mail_agent:contents())
  if (x:is_readable_by(this))
    force_input(this, tostr("@subscribe ", x, " with n"))
  endif
  suspend(0)
endfor
"Last modified by Xavvy (#9613) on Thu Aug 17 12:08:33 2000 MDT."
.