diff options
| author | sebres <sebres@users.sourceforge.net> | 2018-04-30 11:52:12 (GMT) |
|---|---|---|
| committer | sebres <sebres@users.sourceforge.net> | 2018-04-30 11:52:12 (GMT) |
| commit | debcb2bf0157aa00be72330199c44e4d38a4b0ab (patch) | |
| tree | 2de2c3cd70dde878981b1cd6d8b7f9078192b19c | |
| parent | 6ef77228ca33c92d22e830a0d5f86ef1b34e7398 (diff) | |
| download | tcl-debcb2bf0157aa00be72330199c44e4d38a4b0ab.zip tcl-debcb2bf0157aa00be72330199c44e4d38a4b0ab.tar.gz tcl-debcb2bf0157aa00be72330199c44e4d38a4b0ab.tar.bz2 | |
amend after merge 8.5
| -rw-r--r-- | win/tclWinFile.c | 2 |
1 files changed, 1 insertions, 1 deletions
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) { |