@verb #2463:"tell_www_contents" this none this rxdo #60
@program #2463:"tell_www_contents" this none this
"Copied from Generic Room (#6):tell_www_contents by Hacker (#60) Apr 14 16:30:44 2003"
players = things = {}
for x in (args[1])
  link = $web:link(x, `x:title() ! ANY => x.name')
  if (is_player(x))
    players = {@players, link}
  else
    things = {@things, link}
  endif
  $command_utils:suspend_if_needed()
endfor
if (!things)
  $msg:mtell("thing_none")
elseif (length(things) == 1)
  $msg:mtell("thing_sing", things[1])
else
  $msg:mtell("thing_plur", $www:format_list(this.www_list_type, things))
endif
player:tell("<BR>")
if (!players)
  $msg:mtell("player_none")
elseif (length(players) == 1)
  $msg:mtell("player_sing", players[1])
else
  $msg:mtell("player_plur", $www:format_list(this.www_list_type, players))
endif
"Last modified by Cecil (#7407) on Mon Apr 14 16:42:59 2003 MDT."
.