@verb #12:"@desc*ribe" any as any rdo #55
@program #12:"@desc*ribe" any as any
set_task_perms(player)
dobj = player:my_match_object(dobjstr)
iobjstr = player:input_get_raw(iobjstr)
if ($command_utils:object_match_failed(dobj, dobjstr))
  "...lose..."
elseif (e = dobj:set_description(iobjstr))
  $msg:mtell("description", dobj)
else
  player:notify(tostr(e))
endif
"Last modified by Lao-Tzu (#8084) on Tue Feb  5 18:11:59 2002 MST."
.