diff options
Diffstat (limited to 'Crypto.hs')
-rw-r--r-- | Crypto.hs | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -25,8 +25,8 @@ class Signed t where instance Hashable a => Signed (Activity a) where getSignature = activitySignature - hashExceptSignature (Activity a mp _s) = hash $ - Tagged "Activity" [hash a, hash mp] + hashExceptSignature (Activity a mp mt _s) = hash $ + Tagged "Activity" [hash a, hash mp, hash mt] instance Signed Control where getSignature = controlSignature |