@verb #24:"tell*_bin tell_suspended" this none this rxdo #55
@program #24:"tell*_bin tell_suspended" this none this
if (!this:connected())
  return
elseif (this.gaglist && this:gag_p())
  return
elseif (length(args) == 1 && typeof(args[1]) == $LIST)
  text = args[1]
else
  text = {tostr(@args)}
endif
`$wiz_utils:autoextend(this.output_rendering_object) ! ANY'
notify_verb = index(verb, "suspended") ? "notify_suspended" | "notify"
this.responsible = {@this.responsible, {{@$code_utils:callers(), {player, "<cmd-line>", player}}, text}}[max(1, $ - this.lines)..$]
set_task_perms(caller_perms())
"(!index(verb, \"strip\")) && (text = $renderer:render(text));"
text = {@text}
"text[$] = text[$] + `this:ansi_normal() ! ANY => $ansi_utils:normal()';"
if (this._notify_semaphore)
  "Another task is notifying this player."
  fork (0)
    this:(notify_verb)(length(text) == 1 ? text[1] | text)
  endfork
else
  this:(notify_verb)(length(text) == 1 ? text[1] | text)
endif
"Last modified by Dax (#789) on Tue May  3 13:45:01 2005 MDT."
.