arbtt 0.12.0.1 → 0.12.0.2

raw patch · 2 files changed

+8/−2 lines, 2 files

Files

arbtt.cabal +1/−1
src/LockFile.hs +7/−1

arbtt.cabal view

@@ -1,5 +1,5 @@ name:               arbtt-version:            0.12.0.1+version:            0.12.0.2 license:            GPL-2 license-file:       LICENSE category:           Desktop

src/LockFile.hs view

@@ -23,6 +23,12 @@         exitFailure #else     flip catchIOError (\e -> hPutStrLn stderr ("arbtt [Error]: Could not aquire lock for " ++ filename ++"!") >> exitFailure) $ do-        fd <- openFd (filename  ++ ".lck") WriteOnly (Just 0o644) defaultFileFlags+        let fileMode = Just 0o644+        fd <- openFd (filename  ++ ".lck") WriteOnly+#if MIN_VERSION_unix(2,8,0)+            (defaultFileFlags { creat = fileMode })+#else+            fileMode defaultFileFlags+#endif         setLock fd (WriteLock, AbsoluteSeek, 0, 0) #endif