mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

convert fsckKey to a Maybe

Browse source 
This way it's clear when a backend does not implement its own fsck checks.
This commit is contained in:
Joey Hess 2012-01-19 13:51:30 -04:00
parent 50c063df06
commit d36525e974
5 changed files with 8 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

2
Backend/SHA.hs
View file

@ -32,7 +32,7 @@ genBackend size
b = Backend
{ name = shaName size
, getKey = keyValue size
, fsckKey = checkKeyChecksum size
, fsckKey = Just $ checkKeyChecksum size
}
genBackendE :: SHASize -> Maybe Backend