From 6a589688c643d50db43925bf6f3d4e12435297bd Mon Sep 17 00:00:00 2001
From: Efim Poberezkin <8711996+efim-poberezkin@users.noreply.github.com>
Date: Sun, 2 May 2021 00:38:32 +0400
Subject: [PATCH] agent: verify msg integrity based on previous msg hash and id
 (#110)

Co-authored-by: Evgeny Poberezkin <2769109+epoberezkin@users.noreply.github.com>
---
 Main.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Main.hs b/Main.hs
index bf874285d8..3517746a5a 100644
--- a/Main.hs
+++ b/Main.hs
@@ -259,7 +259,7 @@ receiveFromAgent t ct c = forever . atomically $ do
       INV qInfo -> Invitation qInfo
       CON -> Connected contact
       END -> Disconnected contact
-      MSG {m_body} -> ReceivedMessage contact m_body
+      MSG {msgBody} -> ReceivedMessage contact msgBody
       SENT _ -> NoChatResponse
       OK -> Confirmation contact
       ERR (CONN e) -> ContactError e contact