aboutsummaryrefslogtreecommitdiff
path: root/Types/Remote.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joeyh@joeyh.name>2015-10-08 17:58:32 -0400
committerGravatar Joey Hess <joeyh@joeyh.name>2015-10-08 17:58:32 -0400
commita56d3c92b9672c6d84ac007a404b07d3eeb51025 (patch)
tree2264ea086ca39f7243deb1adfcb085551006b07d /Types/Remote.hs
parentd5494842274030d21356c7492e6de5969173c34d (diff)
support invalidating existing VerifiedCopys
Diffstat (limited to 'Types/Remote.hs')
-rw-r--r--Types/Remote.hs3
1 files changed, 3 insertions, 0 deletions
diff --git a/Types/Remote.hs b/Types/Remote.hs
index 1bf79a81e..9e5f9f735 100644
--- a/Types/Remote.hs
+++ b/Types/Remote.hs
@@ -131,6 +131,9 @@ instance Eq (RemoteA a) where
instance Ord (RemoteA a) where
compare = comparing uuid
+instance ToUUID (RemoteA a) where
+ toUUID = uuid
+
-- Use Verified when the content of a key is verified as part of a
-- transfer, and so a separate verification step is not needed.
data Verification = UnVerified | Verified