ole32: Set the storage's class ID in OleCreate.

aaa26b27 · Robert Shearman · Alexandre Julliard · a6e545a2 · aaa26b27
Commit aaa26b27 authored Aug 31, 2006 by Robert Shearman Committed by Alexandre Julliard Sep 07, 2006
Hide whitespace changes
Inline Side-by-side

Showing with 6 additions and 1 deletion

ole2.c dlls/ole32/ole2.c +6 -1

No files found.
--- a/dlls/ole32/ole2.c
+++ b/dlls/ole32/ole2.c
@@ -2304,7 +2304,12 @@ HRESULT WINAPI OleCreate(

    FIXME("\n\t%s\n\t%s semi-stub!\n", debugstr_guid(rclsid), debugstr_guid(riid));

-    if (SUCCEEDED((hres = CoCreateInstance(rclsid, 0, CLSCTX_INPROC_SERVER|CLSCTX_INPROC_HANDLER|CLSCTX_LOCAL_SERVER , riid, (LPVOID*)&pUnk))))
+    hres = CoCreateInstance(rclsid, 0, CLSCTX_INPROC_SERVER|CLSCTX_INPROC_HANDLER|CLSCTX_LOCAL_SERVER , riid, (LPVOID*)&pUnk);
+
+    if (SUCCEEDED(hres))
+        hres = IStorage_SetClass(pStg, rclsid);
+
+    if (SUCCEEDED(hres))
    {
        if (pClientSite)
        {