diff options
author | Joey Hess <joey@kitenet.net> | 2012-06-20 16:07:14 -0400 |
---|---|---|
committer | Joey Hess <joey@kitenet.net> | 2012-06-20 16:31:46 -0400 |
commit | e0fdfb2e706da2cb1451193c658dc676b0530968 (patch) | |
tree | 89ec8551867956be229af9fb726a8bb7a65d6543 /Backend | |
parent | ad11de94e54d17c765d980bfe249eca1c9b6cabd (diff) |
maintain set of files pendingAdd
Kqueue needs to remember which files failed to be added due to being open,
and retry them. This commit gets the data in place for such a retry thread.
Broke KeySource out into its own file, and added Eq and Ord instances
so it can be stored in a Set.
Diffstat (limited to 'Backend')
-rw-r--r-- | Backend/SHA.hs | 1 | ||||
-rw-r--r-- | Backend/WORM.hs | 1 |
2 files changed, 2 insertions, 0 deletions
diff --git a/Backend/SHA.hs b/Backend/SHA.hs index df613bbcd..838a97ab8 100644 --- a/Backend/SHA.hs +++ b/Backend/SHA.hs @@ -11,6 +11,7 @@ import Common.Annex import qualified Annex import Types.Backend import Types.Key +import Types.KeySource import qualified Build.SysConfig as SysConfig type SHASize = Int diff --git a/Backend/WORM.hs b/Backend/WORM.hs index 630000fa2..523203713 100644 --- a/Backend/WORM.hs +++ b/Backend/WORM.hs @@ -10,6 +10,7 @@ module Backend.WORM (backends) where import Common.Annex import Types.Backend import Types.Key +import Types.KeySource backends :: [Backend] backends = [backend] |