@verb #8438:"receive_message bonk_on_mail" this none this rxdo #8438
@program #8438:"receive_message bonk_on_mail" this none this
if (verb == "bonk_on_mail")
  return this.busy ? 0 | pass(@args)
else
  if (!$perm_utils:controls(caller_perms(), this) && caller != this)
    return E_PERM
  endif
  {msg, from} = args
  return !(from in this.gaglist) ? pass(@args) | 0
endif
"Last modified by Cecil (#7407) on Sat Aug 24 12:47:50 2002 MDT."
.