oleaut32: Use implementation bitflag in href.

7adad427 · Andrew Eikum · Alexandre Julliard · d983e6d5 · 7adad427
Commit 7adad427 authored Jun 05, 2013 by Andrew Eikum Committed by Alexandre Julliard Jun 05, 2013
Hide whitespace changes
Inline Side-by-side

Showing with 4 additions and 1 deletion

typelib.c dlls/oleaut32/typelib.c +4 -1

No files found.
--- a/dlls/oleaut32/typelib.c
+++ b/dlls/oleaut32/typelib.c
@@ -6054,8 +6054,11 @@ static HRESULT WINAPI ITypeInfo_fnGetRefTypeOfImplType(
    {
        if(index >= This->cImplTypes)
            hr = TYPE_E_ELEMENTNOTFOUND;
-        else
+        else{
            *pRefType = This->impltypes[index].hRef;
+            if(This->typekind == TKIND_INTERFACE)
+                *pRefType |= 0x2;
+        }
    }

    if(TRACE_ON(ole))