@verb #2981:"@whos" none none none rxd #2633
@program #2981:"@whos" none none none
"Copied from Listing Obj (#8400):@whos by Slacker (#55)Aug 12 03:02:54 2001"
vip = verb_info(this, verb)[1].wizard
player:tell($su:left("Players", 40), "  Espied")
player:tell($su:left("-------", 40), "  ------")
for who in (connected_players(vip))
  wwho = vip ? $su:nn_list(`who.spied ! ANY => {}') | "E_PERM"
  wwho = wwho == "nothing" ? "nobody" | wwho
  player:tell($su:left($su:nn(who), 40), "  ", wwho)
endfor
"Last modified by Slacker (#55) on Sun Aug 26 22:03:07 2001 MDT."
.