@verb #46:"set_name" this none this rxdo #55
@program #46:"set_name" this none this
set_task_perms(caller_perms())
{name} = args
if (name[1] == "*")
  name == name[2..$]
endif
return pass(@args)
"Last modified by manta (#7165) on Wed Apr 29 21:24:04 1998 EDT."
"This verb previously owned by manta (#7165), and chowned to $slacker upon dewizarding (Sat Aug 17 14:50:05 2002 MDT)."
"Last modified by Dax (#789) on Sat Aug 17 14:50:05 2002 MDT."
.