1c5
@verb #16:"_confunc" this none this rxdo #8084
@program #16:"_confunc" this none this
$perm_utils:is_called_from($login, "user_connected") || raise(E_PERM)
pass(@args)
unhand = {}
for x in (children($e911))
  if (x.handled_by == #-1)
    unhand = {@unhand, x}
  endif
endfor
if (unhand)
  this:tell(" -- There are unhandled 911 reports: ", toliteral(unhand), ".")
endif
"Last modified by Cecil (#7407) on Sun Nov  3 19:41:35 2002 MST."
.

0