@@ -35,7 +35,6 @@ openLockFile path = createFile path
36closeLockFile :: LockFile -> IO ()
36closeLockFile :: LockFile -> IO ()
37closeLockFile file = do
37closeLockFile file = do
39 closeHandle file
38 closeHandle file
41--swiped from System.FileLock package
40--swiped from System.FileLock package