Detlef Riekenberg : oleaut32/tests: Fix tmarshal tests on win9x.

[Alexandre Julliard]

Module: wine
Branch: master
Commit: c81b2b2c74cc13396e947daba05a61994d601258
URL:    http://source.winehq.org/git/wine.git/?a=commit;h=c81b2b2c74cc13396e947daba0...

Author: Detlef Riekenberg 
Date:   Mon Jul 21 00:07:53 2008 +0200

oleaut32/tests: Fix tmarshal tests on win9x.

---

dlls/oleaut32/tests/tmarshal.c |    4 +++-
 1 files changed, 3 insertions(+), 1 deletions(-)

diff --git a/dlls/oleaut32/tests/tmarshal.c b/dlls/oleaut32/tests/tmarshal.c
index 7ddbe75..f705722 100644
--- a/dlls/oleaut32/tests/tmarshal.c
+++ b/dlls/oleaut32/tests/tmarshal.c
@@ -701,10 +701,12 @@ typedef struct KindaEnum
 static HRESULT register_current_module_typelib(void)
 {
     WCHAR path[MAX_PATH];
+    CHAR pathA[MAX_PATH];
     HRESULT hr;
     ITypeLib *typelib;

-    GetModuleFileNameW(NULL, path, MAX_PATH);
+    GetModuleFileNameA(NULL, pathA, MAX_PATH);
+    MultiByteToWideChar(CP_ACP, 0, pathA, -1, path, MAX_PATH);

hr = LoadTypeLib(path, &typelib);
     if (SUCCEEDED(hr))