@verb #2348:"reset_database" none none none rxdo #9452
@program #2348:"reset_database" none none none
if (!(caller_perms() in this.admins))
  raise(E_PERM)
else
  sure = $command_utils:yes_or_no("Are you SURE you want to reset the LORD database?")
  if (sure)
    this.player_index = {}
    this.player_database = {}
    player:tell("Database reset.")
  else
    player:tell("Aborted.")
  endif
endif
"Last modified by Crono (#9452) on Fri Apr 12 20:36:12 2002 MDT."
.