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

rough in fsck

Browse source
This commit is contained in:
Joey Hess 2010-11-07 17:26:21 -04:00
commit ea8ccaa3d5
2 changed files with 39 additions and 9 deletions
Download patch file Download diff file Expand all files Collapse all files

2
TypeInternals.hs
View file

@ -39,7 +39,7 @@ type Annex = StateT AnnexState IO
-- annexed filenames are mapped through a backend into keys
type KeyName = String
type BackendName = String
data Key = Key (BackendName, KeyName) deriving (Eq)
data Key = Key (BackendName, KeyName) deriving (Eq, Ord)
-- constructs a key in a backend
genKey :: Backend -> KeyName -> Key