Jacek Caban : oleaut32: Fix sharing options in TLB_ReadTypeLib.

[Alexandre Julliard]

Module: wine
Branch: master
Commit: 62ea59774bfb455737e14fd4ffdc70e2998c1dfc
URL:    https://source.winehq.org/git/wine.git/?a=commit;h=62ea59774bfb455737e14fd4ffdc70e2998c1dfc

Author: Jacek Caban <jacek at codeweavers.com>
Date:   Fri Dec  6 15:48:30 2019 +0100

oleaut32: Fix sharing options in TLB_ReadTypeLib.

Spotted by Donna Whisnant and Kevin Puetz.

Signed-off-by: Jacek Caban <jacek at codeweavers.com>
Signed-off-by: Alexandre Julliard <julliard at winehq.org>

---

 dlls/oleaut32/typelib.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/dlls/oleaut32/typelib.c b/dlls/oleaut32/typelib.c
index e629ed51d5..eb713a4e2f 100644
--- a/dlls/oleaut32/typelib.c
+++ b/dlls/oleaut32/typelib.c
@@ -3329,7 +3329,7 @@ static HRESULT TLB_ReadTypeLib(LPCWSTR pszFileName, LPWSTR pszPath, UINT cchPath
 
     if(file != pszFileName) heap_free(file);
 
-    h = CreateFileW(pszPath, GENERIC_READ, 0, NULL, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, NULL);
+    h = CreateFileW(pszPath, GENERIC_READ, FILE_SHARE_READ, NULL, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, NULL);
     if(h != INVALID_HANDLE_VALUE){
         FILE_NAME_INFORMATION size_info;
         BOOL br;