include elapsedTime in Activity

Time is relative, so the debug-me proof chain doesn't prove when things
happened, but it's still useful to have some idea of how long things
took to happen. This makes --replay work with logs gotten by --download.

Log still includes loggedTimestamp. This is a bit redundant, and is
unused now, but it's useful for log files to record when messages were
received.

This commit was sponsored by Riku Voipio.

1 files changed, 2 insertions, 2 deletions

diff --git a/Crypto.hs b/Crypto.hs
index d973034..e56db89 100644
--- a/Crypto.hs
+++ b/Crypto.hs
@@ -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