oleaut32: Fix sharing options in TLB_ReadTypeLib.

Spotted by Donna Whisnant and Kevin Puetz. Signed-off-by: Jacek Caban <jacek@codeweavers.com> Signed-off-by: Alexandre Julliard <julliard@winehq.org>

oleaut32: Fix sharing options in TLB_ReadTypeLib.
62ea5977 · Jacek Caban · Alexandre Julliard · 741f8ae2 · 62ea5977
Commit 62ea5977 authored Dec 06, 2019 by Jacek Caban Committed by Alexandre Julliard Dec 06, 2019
Hide whitespace changes
Inline Side-by-side

Showing with 1 addition and 1 deletion

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

No files found.
--- 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;