add missing do on windows
This commit is contained in:
parent
b4eb6e3ced
commit
f397296739
1 changed files with 1 additions and 1 deletions
|
@ -178,7 +178,7 @@ lockContentShared key mduration a = do
|
|||
)
|
||||
|
||||
lockdropretention Nothing = noop
|
||||
lockdropretention retention@(Just _) =
|
||||
lockdropretention retention@(Just _) = do
|
||||
-- In order to dropretention, have to
|
||||
-- take an exclusive lock.
|
||||
let (exlocker, expostunlock) =
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue