Piotr Caban : msxml3: Implemented domdoc_put_documentElement.

[Alexandre Julliard]

Module: wine
Branch: master
Commit: 223df167cb55be0923379c85b15061dc7b7a4ce5
URL:    http://source.winehq.org/git/wine.git/?a=commit;h=223df167cb55be0923379c85b15061dc7b7a4ce5

Author: Piotr Caban <piotr.caban at gmail.com>
Date:   Tue Jul  8 20:54:16 2008 +0200

msxml3: Implemented domdoc_put_documentElement.

---

 dlls/msxml3/domdoc.c |   22 ++++++++++++++++++----
 1 files changed, 18 insertions(+), 4 deletions(-)

diff --git a/dlls/msxml3/domdoc.c b/dlls/msxml3/domdoc.c
index 07166ca..ec4b446 100644
--- a/dlls/msxml3/domdoc.c
+++ b/dlls/msxml3/domdoc.c
@@ -914,12 +914,26 @@ static HRESULT WINAPI domdoc_get_documentElement(
 }
 
 
-static HRESULT WINAPI domdoc_documentElement(
+static HRESULT WINAPI domdoc_put_documentElement(
     IXMLDOMDocument2 *iface,
     IXMLDOMElement* DOMElement )
 {
-    FIXME("\n");
-    return E_NOTIMPL;
+    domdoc *This = impl_from_IXMLDOMDocument2( iface );
+    IXMLDOMNode *elementNode;
+    xmlnode *xmlNode;
+    HRESULT hr;
+
+    TRACE("(%p)->(%p)\n", This, DOMElement);
+
+    hr = IXMLDOMElement_QueryInterface( DOMElement, &IID_IXMLDOMNode, (void**)&elementNode );
+    if(FAILED(hr))
+        return hr;
+
+    xmlNode = impl_from_IXMLDOMNode( elementNode );
+    xmlDocSetRootElement( get_doc(This), xmlNode->node);
+    IXMLDOMNode_Release( elementNode );
+
+    return S_OK;
 }
 
 
@@ -1931,7 +1945,7 @@ static const struct IXMLDOMDocument2Vtbl domdoc_vtbl =
     domdoc_get_doctype,
     domdoc_get_implementation,
     domdoc_get_documentElement,
-    domdoc_documentElement,
+    domdoc_put_documentElement,
     domdoc_createElement,
     domdoc_createDocumentFragment,
     domdoc_createTextNode,