[PATCH] olesvr32: Add OleRevokeServer stub

[Ken Sharp]

---
 dlls/olesvr32/olesvr32.spec |    2 +-
 dlls/olesvr32/olesvr_main.c |   10 ++++++++++
 2 files changed, 11 insertions(+), 1 deletions(-)

diff --git a/dlls/olesvr32/olesvr32.spec b/dlls/olesvr32/olesvr32.spec
index 9fdd02d..9db60ec 100644
--- a/dlls/olesvr32/olesvr32.spec
+++ b/dlls/olesvr32/olesvr32.spec
@@ -1,6 +1,6 @@
  1 stub WEP
  2 stdcall OleRegisterServer(str ptr ptr long long)
- 3 stub OleRevokeServer
+ 3 stdcall OleRevokeServer(long)
  4 stdcall OleBlockServer(long)
  5 stdcall OleUnblockServer(long ptr)
  6 stdcall OleRegisterServerDoc(ptr str ptr ptr)
diff --git a/dlls/olesvr32/olesvr_main.c b/dlls/olesvr32/olesvr_main.c
index b48d58b..57c28e1 100644
--- a/dlls/olesvr32/olesvr_main.c
+++ b/dlls/olesvr32/olesvr_main.c
@@ -210,3 +210,13 @@ OLESTATUS WINAPI OleSavedServerDoc(LHSERVERDOC hDoc)
     FIXME("(%d): stub.\n", hDoc);
     return OLE_OK;
 }
+
+/******************************************************************************
+ *		OleRevokeServer	[OLESVR32.3]
+ *
+ */
+OLESTATUS WINAPI OleRevokeServer(LHSERVER hServer)
+{
+    FIXME("(%d): stub.\n", hServer);
+    return OLE_OK;
+}
-- 
1.5.6.3


--------------040507030709060303000209--