/*
 * call-seq:
 *  to_html
 *
 * Returns this node as HTML
 */
static VALUE to_html(VALUE self)
{
  xmlBufferPtr buf ;
  xmlNodePtr node ;
  Data_Get_Struct(self, xmlNode, node);

  VALUE html;

  if(node->doc->type == XML_DOCUMENT_NODE)
    return rb_funcall(self, rb_intern("to_xml"), 0);

  buf = xmlBufferCreate() ;
  htmlNodeDump(buf, node->doc, node);
  html = rb_str_new2((char*)buf->content);
  xmlBufferFree(buf);
  return html ;
}