2014-01-28 18:17:14 +00:00
|
|
|
{- git-annex lock pool data types
|
|
|
|
-
|
|
|
|
- Copyright 2014 Joey Hess <joey@kitenet.net>
|
|
|
|
-
|
|
|
|
- Licensed under the GNU GPL version 3 or higher.
|
|
|
|
-}
|
|
|
|
|
|
|
|
module Types.LockPool (
|
|
|
|
LockPool,
|
|
|
|
LockHandle
|
|
|
|
) where
|
|
|
|
|
|
|
|
import qualified Data.Map as M
|
2014-08-20 20:45:58 +00:00
|
|
|
import Utility.LockFile
|
2014-01-28 18:17:14 +00:00
|
|
|
|
|
|
|
type LockPool = M.Map FilePath LockHandle
|