fix case of Win32

This commit is contained in:
Joey Hess 2022-08-04 12:17:27 -04:00
parent 2824b476c2
commit cd9fd6e28c
No known key found for this signature in database
GPG key ID: DB12DB0FF05F8F38
2 changed files with 8 additions and 1 deletions

View file

@ -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)

View file

@ -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.
"""]]