shell32: Release iTypeInfo on error.

diff --git a/dlls/shell32/shelldispatch.c b/dlls/shell32/shelldispatch.c
index 3497c3dbb9f335355eef90aad3cf1718d2cd5718..bef14d8c4023e18dcdac9bdf062480c354023e17 100644 (file)
--- a/dlls/shell32/shelldispatch.c
+++ b/dlls/shell32/shelldispatch.c
@@ -711,6 +711,7 @@ static HRESULT Folder_Constructor(VARIANT *dir, Folder **ppsdf)
     ret = VariantCopy(&This->dir, dir);
     if (FAILED(ret))
     {
+        ITypeInfo_Release(This->iTypeInfo);
         HeapFree(GetProcessHeap(), 0, This);
         return E_OUTOFMEMORY;
     }