Fabian Maurer : coml2: Move StgCreatePropSetStg from ole32.

[Alexandre Julliard]

Module: wine
Branch: master
Commit: 8e48d7fdbdbdcf0bf2f2ff48b9abfcfdcfe2aae0
URL:    https://gitlab.winehq.org/wine/wine/-/commit/8e48d7fdbdbdcf0bf2f2ff48b9abfcf...

Author: Fabian Maurer <dark.shadow4(a)web.de>
Date:   Sun Dec  3 23:26:55 2023 +0100

coml2: Move StgCreatePropSetStg from ole32.

---

 dlls/coml2/coml2.spec  |  2 +-
 dlls/coml2/storage32.c | 12 ++++++++++++
 dlls/ole32/storage32.c | 13 -------------
 3 files changed, 13 insertions(+), 14 deletions(-)

diff --git a/dlls/coml2/coml2.spec b/dlls/coml2/coml2.spec
index 694790350cc..f9747cb449d 100644
--- a/dlls/coml2/coml2.spec
+++ b/dlls/coml2/coml2.spec
@@ -19,7 +19,7 @@
 @ stdcall ReadClassStm(ptr ptr)
 @ stub StgCreateDocfile
 @ stub StgCreateDocfileOnILockBytes
-@ stub StgCreatePropSetStg
+@ stdcall StgCreatePropSetStg(ptr long ptr)
 @ stub StgCreatePropStg
 @ stub StgCreateStorageEx
 @ stdcall StgIsStorageFile(wstr)
diff --git a/dlls/coml2/storage32.c b/dlls/coml2/storage32.c
index dd803c817c9..d6dab7d6b17 100644
--- a/dlls/coml2/storage32.c
+++ b/dlls/coml2/storage32.c
@@ -226,3 +226,15 @@ HRESULT WINAPI StgIsStorageFile(LPCOLESTR fn)
     TRACE(" -> Invalid header.\n");
     return S_FALSE;
 }
+
+/******************************************************************************
+ *              StgCreatePropSetStg       [coml2.@]
+ */
+HRESULT WINAPI StgCreatePropSetStg(IStorage *pstg, DWORD reserved, IPropertySetStorage **propset)
+{
+    TRACE("%p, %#lx, %p.\n", pstg, reserved, propset);
+    if (reserved)
+        return STG_E_INVALIDPARAMETER;
+
+    return IStorage_QueryInterface(pstg, &IID_IPropertySetStorage, (void**)propset);
+}
diff --git a/dlls/ole32/storage32.c b/dlls/ole32/storage32.c
index f0ec0b5e954..1bf08e45701 100644
--- a/dlls/ole32/storage32.c
+++ b/dlls/ole32/storage32.c
@@ -8649,19 +8649,6 @@ HRESULT WINAPI StgCreateStorageEx(const WCHAR* pwcsName, DWORD grfMode, DWORD st
     return STG_E_INVALIDPARAMETER;
 }
 
-/******************************************************************************
- *              StgCreatePropSetStg       [OLE32.@]
- */
-HRESULT WINAPI StgCreatePropSetStg(IStorage *pstg, DWORD reserved,
- IPropertySetStorage **propset)
-{
-    TRACE("%p, %#lx, %p.\n", pstg, reserved, propset);
-    if (reserved)
-        return STG_E_INVALIDPARAMETER;
-
-    return IStorage_QueryInterface(pstg, &IID_IPropertySetStorage, (void**)propset);
-}
-
 /******************************************************************************
  *              StgOpenStorageEx      [OLE32.@]
  */