summaryrefslogtreecommitdiff
path: root/BackendClass.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2011-03-23 17:57:10 -0400
committerGravatar Joey Hess <joey@kitenet.net>2011-03-23 17:57:10 -0400
commit6246b807f7df32877a87d906cfbe1ae26c51dd8e (patch)
tree00c38d74c2b4591ab0a68a807bb70c6044cde3f4 /BackendClass.hs
parentad08273ac5118f1faac539b53f1fa63908dc5656 (diff)
migrate: Support migrating v1 SHA keys to v2 SHA keys with size information that can be used for free space checking.
Diffstat (limited to 'BackendClass.hs')
-rw-r--r--BackendClass.hs4
1 files changed, 3 insertions, 1 deletions
diff --git a/BackendClass.hs b/BackendClass.hs
index 909ae8f96..b2d8879c2 100644
--- a/BackendClass.hs
+++ b/BackendClass.hs
@@ -29,7 +29,9 @@ data Backend a = Backend {
-- (second parameter may be the filename associated with it)
-- (third parameter may be the number of copies that there should
-- be of the key)
- fsckKey :: Key -> Maybe FilePath -> Maybe Int -> a Bool
+ fsckKey :: Key -> Maybe FilePath -> Maybe Int -> a Bool,
+ -- Is a newer repesentation possible for a key?
+ upgradableKey :: Key -> a Bool
}
instance Show (Backend a) where