Create stub for CreateClassMoniker

[Mike McCormack]

ChangeLog:
* Create stub for CreateClassMoniker
-------------- next part --------------
Index: dlls/ole32/moniker.c
===================================================================
RCS file: /home/wine/wine/dlls/ole32/moniker.c,v
retrieving revision 1.23
diff -u -r1.23 moniker.c
--- dlls/ole32/moniker.c	2 Jul 2003 04:37:26 -0000	1.23
+++ dlls/ole32/moniker.c	17 Jul 2003 19:06:27 -0000
@@ -522,3 +522,16 @@
 
     return MK_E_SYNTAX;
 }
+
+/******************************************************************************
+ *              CreateClassMoniker        [OLE32.*]
+ */
+ HRESULT WINAPI CreateClassMoniker(REFCLSID rclsid, IMoniker ** ppmk)
+ {
+     FIXME("%s\n", debugstr_guid( rclsid ));
+     if( ppmk )
+         *ppmk = NULL;
+     return E_NOTIMPL;
+ }
+
+
Index: dlls/ole32/ole32.spec
===================================================================
RCS file: /home/wine/wine/dlls/ole32/ole32.spec,v
retrieving revision 1.49
diff -u -r1.49 ole32.spec
--- dlls/ole32/ole32.spec	27 Jun 2003 04:03:40 -0000	1.49
+++ dlls/ole32/ole32.spec	17 Jul 2003 19:06:27 -0000
@@ -174,7 +174,7 @@
 174 stub CoRevertToSelf             # stdcall () return 0,ERR_NOTIMPLEMENTED
 175 stub CoSetProxyBlanket          # stdcall (ptr long long wstr long long ptr long) return 0,ERR_NOTIMPLEMENTED
 176 stub CoSuspendClassObjects      # stdcall () return 0,ERR_NOTIMPLEMENTED
-177 stub CreateClassMoniker         # stdcall (ptr ptr) return 0,ERR_NOTIMPLEMENTED
+177 stdcall CreateClassMoniker(ptr ptr)
 178 stub CLIPFORMAT_UserFree
 179 stub CLIPFORMAT_UserMarshal
 180 stub CLIPFORMAT_UserSize