COWbrowse

You are looking at a command called changename

changename {object} to "new name"

Allows you to change the name of a named object.

create a fig called ben
changename fig to mellony

You now have a fig called mellony.

This is similar to rename which actually changes the 'fig' part of an object.
read the command called rename

Created by wolis, last updated 15 Apr 2009

Code

get $target,$rel,$text in $loc;
if $rel eq 'to' then checkpw else fail;
##checkpw:
if $pw like $target's pwd then updateit else itslocked;
##updateit:
set $target's name to "$text";
say 'change',"[$actor] renames $cmd_text";
relook $loc;

##itslocked:
say 'changefail',"[$actor] could not rename $cmd_text because it is locked";
##fail:
say 'changefail',"[$actor] could not rename $cmd_text";