fix case of Win32
This commit is contained in:
parent
2824b476c2
commit
cd9fd6e28c
2 changed files with 8 additions and 1 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,3)
|
||||
r <- tryNonAsync $ createFile_NoRetry f' gENERIC_READ sharemode
|
||||
security_attributes oPEN_ALWAYS fILE_ATTRIBUTE_NORMAL
|
||||
(maybePtr Nothing)
|
||||
|
|
|
@ -0,0 +1,7 @@
|
|||
[[!comment format=mdwn
|
||||
username="joey"
|
||||
subject="""comment 7"""
|
||||
date="2022-08-04T16:16:59Z"
|
||||
content="""
|
||||
Ah yes, case-sensativity urk. Thanks, fixed.
|
||||
"""]]
|
Loading…
Reference in a new issue