Jacek Caban : vbscript: Ignore fdexNameCaseSensitive flag.

Alexandre Julliard julliard at winehq.org
Mon Aug 13 13:21:18 CDT 2012


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

Author: Jacek Caban <jacek at codeweavers.com>
Date:   Mon Aug 13 11:03:46 2012 +0200

vbscript: Ignore fdexNameCaseSensitive flag.

---

 dlls/vbscript/tests/run.c |   14 ++++++++++++++
 dlls/vbscript/vbdisp.c    |    4 +++-
 2 files changed, 17 insertions(+), 1 deletions(-)

diff --git a/dlls/vbscript/tests/run.c b/dlls/vbscript/tests/run.c
index 099126d..d77c6cb 100644
--- a/dlls/vbscript/tests/run.c
+++ b/dlls/vbscript/tests/run.c
@@ -355,6 +355,20 @@ static void test_disp(IDispatch *disp)
     SysFreeString(str);
     ok(hres == S_OK, "GetDispID(publicProp) failed: %08x\n", hres);
 
+    id = 0xdeadbeef;
+    str = a2bstr("publicProp");
+    hres = IDispatchEx_GetDispID(dispex, str, fdexNameCaseSensitive, &id);
+    SysFreeString(str);
+    ok(hres == S_OK, "GetDispID(publicProp) failed: %08x\n", hres);
+    ok(id == public_prop_id, "id = %d, expected %d\n", id, public_prop_id);
+
+    id = 0xdeadbeef;
+    str = a2bstr("publicprop");
+    hres = IDispatchEx_GetDispID(dispex, str, fdexNameCaseSensitive, &id);
+    SysFreeString(str);
+    ok(hres == S_OK, "GetDispID(publicProp) failed: %08x\n", hres);
+    ok(id == public_prop_id, "id = %d, expected %d\n", id, public_prop_id);
+
     IDispatchEx_Release(dispex);
 }
 
diff --git a/dlls/vbscript/vbdisp.c b/dlls/vbscript/vbdisp.c
index 5f9d70a..022ac1d 100644
--- a/dlls/vbscript/vbdisp.c
+++ b/dlls/vbscript/vbdisp.c
@@ -333,7 +333,9 @@ static HRESULT WINAPI DispatchEx_GetDispID(IDispatchEx *iface, BSTR bstrName, DW
     if(!This->desc)
         return E_UNEXPECTED;
 
-    if(grfdex & ~(fdexNameEnsure|fdexNameCaseInsensitive)) {
+    /* Tests show that fdexNameCaseSensitive is ignored */
+
+    if(grfdex & ~(fdexNameEnsure|fdexNameCaseInsensitive|fdexNameCaseSensitive)) {
         FIXME("unsupported flags %x\n", grfdex);
         return E_NOTIMPL;
     }




More information about the wine-cvs mailing list