@verb #3425:"report" this none this rxd #3425
@program #3425:"report" this none this
if (player != this && !$perm_utils:controls(caller_perms(), this))
  return
endif
text = args
msg = ""
for item in (text)
  if (typeof(item) == $STR)
    msg = msg + item
  else
    msg = msg + toliteral(item)
  endif
endfor
msg = tostr("[", caller, ":", callers()[1][2], "()] ", msg)
if (caller_perms().wizard || (caller != $list_utils && "report" in $list_utils:slice(callers(), 2)))
  notify(this, msg)
elseif (caller == this)
  notify(this, msg)
else
  this:tell(msg)
endif
"Last modified by Dax (#789) on Tue May  3 13:43:10 2005 MDT."
.