308
@verb #3972:"@unbann" any none none rdo #2322
@program #3972:"@unbann" any none none
if (player == this.owner)
  evilnowagoodperson = $string_utils:match_local_player(dobjstr)
  if (evilnowagoodperson in this.banned)
    this.banned = setremove(this.banned, evilnowagoodperson)
    player:tell("You have unbanned ", evilnowagoodperson.name, " from ", this.name, ".")
    evilnowagoodperson:tell("You have been unbanned from ", this.name, " by ", player.name, ", be good this time!")
    player.location:announce(player.name, " has unbanned ", evilnowagoodperson.name, " from ", this.name, ".")
  else
    player:tell(evilnowagoodperson.name, " is not in your banned list.")
  endif
endif
"Last modified by Roosterman (#2322) on Fri Dec 17 17:49:56 1999 MST."
.

0