From 98231044e365a455e242bda66af85df82d18c9b0 Mon Sep 17 00:00:00 2001
From: Francis Beaudet <francis@macadamian.com>
Date: Sat, 12 Jun 1999 08:20:30 +0000
Subject: [PATCH] Fixed a problem with the LoadTypeLib method.

---
 ole/typelib.c | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/ole/typelib.c b/ole/typelib.c
index 830778ee2e3..6de2df33767 100644
--- a/ole/typelib.c
+++ b/ole/typelib.c
@@ -1068,6 +1068,8 @@ int TLB_ReadTypeLib(PCHAR file, ITypeLib **ppTypeLib)
 		tlbSegDir.pImpInfo.res0c != 0x0F
     ) {
         ERR( typelib,"cannot find the table directory, ptr=0x%lx\n",lPSegDir);
+	CloseHandle(cx.hFile);
+        return E_FAIL;
     }
     /* now fill our internal data */
     /* TLIBATTR fields */