summaryrefslogtreecommitdiff
path: root/Types/Remote.hs
diff options
context:
space:
mode:
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