25d
@verb #49:"note_text" this none this rxdo #55
@program #49:"note_text" this none this
"WIZARDLY"
if (caller != $note_editor || caller_perms() != $note_editor.owner)
  raise(E_PERM)
endif
set_task_perms(player)
if (typeof(spec = args[1]) == $OBJ)
  text = spec:text()
elseif (spec[2][1] == ".")
  "text = spec[1].(spec[2][2..$])"
  text = spec[1]:("_get_" + spec[2][2..$])()
elseif (spec[2][1] == "!")
  text = spec[1]:fileread(spec[2][2..$])
else
  raise(E_TYPE, "Neither a prop nor a file?", spec[2])
endif
return text
"Last modified by Dax (#789) on Tue May  3 13:47:07 2005 MDT."
.

0