coml2: Move StgCreatePropSetStg from ole32.

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)

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);
+}

dlls/ole32/storage32.c

@@ -8650,19 +8650,6 @@ HRESULT WINAPI StgCreateStorageEx(const WCHAR* pwcsName, DWORD grfMode, DWORD st
 }
 
 /******************************************************************************
- *              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.@]
  */
 HRESULT WINAPI StgOpenStorageEx(const WCHAR* pwcsName, DWORD grfMode, DWORD stgfmt, DWORD grfAttrs, STGOPTIONS* pStgOptions, void* reserved, REFIID riid, void** ppObjectOpen)