aboutsummaryrefslogtreecommitdiff
path: root/Backend
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2012-06-20 16:07:14 -0400
committerGravatar Joey Hess <joey@kitenet.net>2012-06-20 16:31:46 -0400
commite0fdfb2e706da2cb1451193c658dc676b0530968 (patch)
tree89ec8551867956be229af9fb726a8bb7a65d6543 /Backend
parentad11de94e54d17c765d980bfe249eca1c9b6cabd (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.hs1
-rw-r--r--Backend/WORM.hs1
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]