View/Edit #42:set_names

Name(s): set_names

1:  "$building_utils:set_names(object, spec)"
2:  set_task_perms(caller_perms())
3:  object = args[1]
4:  {object, spec} = args
5:  if (typeof(spec) == $STR)
6:    spec = this:parse_names(spec)
7:    spec = {spec[1], @spec[2]}
8:  endif
9:  name = spec[1] || object.name
10: return object:set_aliases(listdelete(spec, 1)) && object:set_name(name)
11: "Last modified by Dax (#789) on Tue May  3 13:43:07 2005 MDT."

Verb arguments: this none this
Verb perms: Readable eXecutable NOT-Debug
Verb owned by: Slacker (#55)

You are not logged in.