diff options
Diffstat (limited to 'Hash.hs')
-rw-r--r-- | Hash.hs | 3 |
1 files changed, 2 insertions, 1 deletions
@@ -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 |