diff options
author | Joey Hess <joey@kitenet.net> | 2011-01-26 20:37:46 -0400 |
---|---|---|
committer | Joey Hess <joey@kitenet.net> | 2011-01-26 20:37:46 -0400 |
commit | e1d213d6e3c9fe0cda6e2b80c4abeb17db5d3a16 (patch) | |
tree | 93582f5e205a144f49a937b3b7ae5d1084469a6f /BackendTypes.hs | |
parent | c30d38e108ade7eb4fa57552631b64dd3b9582c4 (diff) |
make filename available to fsck messages
Diffstat (limited to 'BackendTypes.hs')
-rw-r--r-- | BackendTypes.hs | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/BackendTypes.hs b/BackendTypes.hs index e4b155f98..fd4a61b98 100644 --- a/BackendTypes.hs +++ b/BackendTypes.hs @@ -31,9 +31,10 @@ data Backend a = Backend { -- checks if a backend is storing the content of a key hasKey :: Key -> a Bool, -- called during fsck to check a key - -- (second parameter may be the number of copies that there should + -- (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 Int -> a Bool + fsckKey :: Key -> Maybe FilePath -> Maybe Int -> a Bool } instance Show (Backend a) where |