@verb #1002:"@trust @untrust" any with/using this rdo #7153
@program #1002:"@trust @untrust" any with/using this
"Usage:  @trust <player>"
"   -=>  Adds <player> to the list of trusted people.  Only the owner can use"
"        this."
if (player == this.owner)
  if ((who = $su:match_player(dobjstr)) == $failed_match)
    player:tell("`", dobjstr, "' is not a valid player.")
    return
  elseif (who == #-2)
    player:Tell("There appear to be several `", dobjstr, "' around, odd.")
    return
  endif
  if (verb[2..3] == "un")
    this.trusted = setremove(this.trusted, who)
    player:tell($su:nn(who), " has been removed from the trusted list.")
  else
    this.trusted = {@this.trusted, who}
    player:tell($su:nn(who), " has been added to the trusted list.")
  endif
else
  player:Tell("Sorry, only the owner can do that.")
endif
.