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

support invalidating existing VerifiedCopys

Browse source
This commit is contained in:
Joey Hess 2015-10-08 17:58:32 -04:00
parent 90f7c4b6a2
commit c75c79864d
Failed to extract signature
8 changed files with 73 additions and 23 deletions
Download patch file Download diff file Expand all files Collapse all files

3
Types/UUID.hs
View file

@ -24,6 +24,9 @@ fromUUID NoUUID = ""
class ToUUID a where
toUUID :: a -> UUID
instance ToUUID UUID where
toUUID = id
instance ToUUID String where
toUUID [] = NoUUID
toUUID s = UUID s