replace guessed win32 version with actual version 2.13.4.0
This commit is contained in:
parent
4f6c6114fb
commit
2eedf58630
2 changed files with 2 additions and 2 deletions
|
@ -61,7 +61,7 @@ lockExclusive = openLock fILE_SHARE_NONE
|
|||
openLock :: ShareMode -> LockFile -> IO (Maybe LockHandle)
|
||||
openLock sharemode f = do
|
||||
f' <- convertToNativeNamespace f
|
||||
#if MIN_VERSION_Win32(2,13,3)
|
||||
#if MIN_VERSION_Win32(2,13,4)
|
||||
r <- tryNonAsync $ createFile_NoRetry f' gENERIC_READ sharemode
|
||||
security_attributes oPEN_ALWAYS fILE_ATTRIBUTE_NORMAL
|
||||
(maybePtr Nothing)
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue