--- tclWinFile_0a2e3bb2d9.c	2015-04-22 14:35:07.396699500 +0200
+++ tclWinFile_new.c	2015-04-22 14:33:42.798240500 +0200
@@ -668,7 +668,7 @@
     HANDLE hFile;
     DWORD returnedLength;
 
-    hFile = CreateFile(linkDirPath, desiredAccess, 0, NULL, OPEN_EXISTING,
+    hFile = CreateFile(linkDirPath, desiredAccess, FILE_SHARE_READ, NULL, OPEN_EXISTING,
 	    FILE_FLAG_OPEN_REPARSE_POINT | FILE_FLAG_BACKUP_SEMANTICS, NULL);
 
     if (hFile == INVALID_HANDLE_VALUE) {
