@verb #12:"has_new_mail" this none this rxdo #789
@program #12:"has_new_mail" this none this
"Does this player have mail waiting?"
"No security, there doesn't appear to be a privacy issue."
ngs = $list_utils:slice(this.current_message[3..$])
text = ""
for ng in ({this, @$newsgroups:sort_groups(ngs)})
  if (`length(ng:unread_messages(this)) ! ANY')
    return 1
  endif
  $command_utils:suspend_if_needed()
endfor
return 0
"Last modified by Dax (#789) on Sat Sep 28 05:49:17 2002 MDT."
.