/*
 * call-seq:
 *  []=(property, value)
 *
 * Set the +property+ to +value+
 */
static VALUE set(VALUE self, VALUE property, VALUE value)
{
  xmlNodePtr node;
  Data_Get_Struct(self, xmlNode, node);

  xmlChar *buffer = xmlEncodeEntitiesReentrant(node->doc,
      (xmlChar *)StringValuePtr(value));

  xmlSetProp(node, (xmlChar *)StringValuePtr(property), buffer);
  xmlFree(buffer);

  return value;
}