From debcb2bf0157aa00be72330199c44e4d38a4b0ab Mon Sep 17 00:00:00 2001 From: sebres Date: Mon, 30 Apr 2018 11:52:12 +0000 Subject: amend after merge 8.5 --- win/tclWinFile.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/win/tclWinFile.c b/win/tclWinFile.c index 4525d8a..9afe0a9 100644 --- a/win/tclWinFile.c +++ b/win/tclWinFile.c @@ -1592,7 +1592,7 @@ NativeAccess( if (mode & W_OK) { mask |= GENERIC_WRITE; } if (mode & X_OK) { mask |= GENERIC_EXECUTE; } - hFile = (tclWinProcs->createFileProc)(nativePath, mask, + hFile = CreateFile(nativePath, mask, FILE_SHARE_READ | FILE_SHARE_WRITE | FILE_SHARE_DELETE, NULL, OPEN_EXISTING, FILE_FLAG_NO_BUFFERING, NULL); if (hFile != INVALID_HANDLE_VALUE) { -- cgit v0.12