@verb #770:"set_aliases _set_aliases" this none this rxd #7407
@program #770:"set_aliases _set_aliases" this none this
caller_perms():controls(this) || raise(E_PERM)
return `pass(setadd(args[1], this.name)) ! ANY'
"Last modified by Cecil (#7407) on Mon Dec 10 18:53:50 2001 MST."
.