Use FILE_SHARE_READ to open the file in GetBinaryTypeA.

diff --git a/loader/module.c b/loader/module.c
index 0b324ba..a55837a 100644
--- a/loader/module.c
+++ b/loader/module.c
@@ -607,7 +607,7 @@
 
     /* Open the file indicated by lpApplicationName for reading.
      */
-    hfile = CreateFileA( lpApplicationName, GENERIC_READ, 0,
+    hfile = CreateFileA( lpApplicationName, GENERIC_READ, FILE_SHARE_READ,
                          NULL, OPEN_EXISTING, 0, -1 );
     if ( hfile == INVALID_HANDLE_VALUE )
         return FALSE;