summaryrefslogtreecommitdiffhomepage
path: root/Hash.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Hash.hs')
-rw-r--r--Hash.hs3
1 files changed, 2 insertions, 1 deletions
diff --git a/Hash.hs b/Hash.hs
index ed4513b..2577c6b 100644
--- a/Hash.hs
+++ b/Hash.hs
@@ -50,7 +50,8 @@ instance Hashable Seen where
hash v = hash $ Tagged "Seen" [hash (seenData v)]
instance Hashable Signature where
- hash (Signature s) = hash $ Tagged "Signature" s
+ hash (Ed25519 s) = hash $ Tagged "Ed25519" s
+ hash Unsigned = hash $ Tagged "Unsigned" (mempty :: B.ByteString)
-- | Hash a list of hashes by hashing the concacenation of the hashes.
instance Hashable [Hash] where