method set_text t = text <- t ; self#obj >>> AXOJs.Node.empty ; self#obj >>> AXOJs.Node.append ( AXOJs.Node.text t ) ;