Fix build on Windows
Thanks to bug reporter for the patch.
This commit is contained in:
parent
9cb250f7be
commit
4b739fc460
8 changed files with 11 additions and 8 deletions
|
@ -112,7 +112,7 @@ lockPidFile pidfile = do
|
|||
pid <- getPID
|
||||
writeFile pidfile (show pid)
|
||||
lckfile <- winLockFile pid pidfile
|
||||
writeFile lckfile ""
|
||||
writeFile (fromRawFilePath lckfile) ""
|
||||
void $ lockExclusive lckfile
|
||||
#endif
|
||||
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue