diff options
Diffstat (limited to 'BackendClass.hs')
| -rw-r--r-- | BackendClass.hs | 4 |
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 |