@verb #7087:":setAttribute" this none this rxdo #7788
@program #7087:":setAttribute" this none this
"  void setAttribute(in DOMString name, in DOMString value) raises(DOMException);"
""
"Adds a new attribute.  If an attribute with that name is already present in the element, its value is changed to be that of the value parameter.  This value is a simple string; it is not parsed as it is being set.  So any markup is treated as literal text, and needs to be appropriately escaped by the implementation when it is written out.  In order to assign an attribute value that contains entity references, the user must create an Attr node plus any Text and EntityReference nodes, build the appropriate subtree, and use setAttributeNode to assign it as the value of an attribute.  To set an attribute with a qualified name and namespace URI, use the setAttributeNS method."
"  name of type DOMString -> the name of the attribute to create or alter"
"  value of type DOMString -> value to set in string form"
{name, value} = args
this->__attributes = setremove(this->__attributes, listassoc(name, this->__attributes))
this->__attributes = {@this->__attributes, {name, strsub(value, "&", "&")}}
$dom:updateParentsChildren(this)
"Last modified by Floyd (#7788) on Thu Nov 14 19:43:44 2002 MST."
.