From d2319ae841dadf086d86819410e4b0085f167f55 Mon Sep 17 00:00:00 2001
From: Piotr Caban <piotr@codeweavers.com>
Date: Wed, 17 Mar 2010 22:05:36 +0100
Subject: [PATCH] oleaut32: Fix ITypeInfo GetImplTypeFlags for dispinterfaces.

---
 dlls/oleaut32/typelib.c | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/dlls/oleaut32/typelib.c b/dlls/oleaut32/typelib.c
index 08a39b976fc..b09f7ab64d1 100644
--- a/dlls/oleaut32/typelib.c
+++ b/dlls/oleaut32/typelib.c
@@ -5581,6 +5581,11 @@ static HRESULT WINAPI ITypeInfo_fnGetImplTypeFlags( ITypeInfo2 *iface,
         return S_OK;
     }
     *pImplTypeFlags=0;
+
+    if(This->TypeAttr.typekind==TKIND_DISPATCH && !index)
+        return S_OK;
+
+    WARN("ImplType %d not found\n", index);
     return TYPE_E_ELEMENTNOTFOUND;
 }