@verb #7113:"check" none none none rdo #7113
@program #7113:"check" none none none
"Copied from BenC (#7854):check Aug  1 10:31:21 1997"
for x in [0..toint(max_object())]
  x = toobj(x)
  for q in (`verbs(x) ! E_PERM => {}')
    if (`verb_info(x, q in verbs(x))[1].wizard ! E_PERM')
      $command_utils:suspend_if_needed()
      player:tell(x, ":", q, "  has wiz perms.")
    endif
  endfor
endfor
"Last modified by Dax (#789) on Tue May  3 14:14:14 2005 MDT."
.