@verb #9131:"@aliases ll @owner" any none none rdo #9131
@program #9131:"@aliases ll @owner" any none none
"This verb was improve upon by Samson (#9131). All rights, copyrights, and other stuff belong to the original owner."
"Copied from Lila (#9102):ll Oct 19 18:43:30 2000"
"Copied from ChocolateGuy (#4813):ll Jun 22 11:56:34 2000"
what = this:my_match_object(dobjstr)
if (!valid(what))
  what = $su:match_player(dobjstr)
  if (!valid(what))
    biglist = $physical:descendants_suspended()
    what = $su:match_suspended(dobjstr, biglist, "name", biglist, "aliases")
    if (!valid(what))
      return $cmd_utils:object_match_failed(what, dobjstr)
    endif
  endif
endif
player:tell("")
player:tell("-------------------------------------------------------------")
player:tell("")
player:tell("<u><b>Name:</u></b> ", what.name)
player:tell("<u><b>Title:</b></u> ", what:title())
player:tell("<u><b>Aliases:</u></b> ", $su:english_list(what.aliases))
player:tell("  <u><b>Shortest:</u></b> ", $list_utils:shortest(what.aliases))
player:tell("")
player:tell("-------------------------------------------------------------")
player:Tell("")
what:look_self()
player:Tell("")
player:tell("-------------------------------------------------------------")
player:Tell("")
player:tell("Owner: ", what.owner:nn())
player:tell("")
player:tell("r: ", what.r, "; w: ", what.w, "; f: ", what.f)
player:tell("")
player:tell("-------------------------------------------------------------")
player:tell("")
player:tell("<u><b>Verbs:</u></b> ", toliteral(what:verbs()))
player:tell("")
player:tell("-------------------------------------------------------------")
player:tell("")
player:tell("<u><b>Files:</u></b> ", toliteral(what:filelist()))
player:tell("")
player:tell("-------------------------------------------------------------")
player:tell("")
player:tell("<u><b>Props:</u></b> ", toliteral(what:properties()))
player:tell("")
player:tell("-------------------------------------------------------------")
player:tell("")
"Last modified by Samson (#9131) on Sat Oct 21 04:42:30 2000 MDT."
.