From 2a61085f078417c6a0767d3e2d8162bac83c963c Mon Sep 17 00:00:00 2001 From: Evgeny Poberezkin Date: Sun, 7 Sep 2025 15:04:06 +0100 Subject: [PATCH] backward compatible encoding for missing NetworkError --- src/Simplex/Messaging/Protocol.hs | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/src/Simplex/Messaging/Protocol.hs b/src/Simplex/Messaging/Protocol.hs index e5d918cc6..40314ad2a 100644 --- a/src/Simplex/Messaging/Protocol.hs +++ b/src/Simplex/Messaging/Protocol.hs @@ -2258,7 +2258,11 @@ $(J.deriveJSON defaultJSON ''MsgFlags) $(J.deriveJSON (sumTypeJSON id) ''CommandError) -$(J.deriveJSON (sumTypeJSON $ dropPrefix "NE") ''NetworkError) +$(J.deriveToJSON (sumTypeJSON $ dropPrefix "NE") ''NetworkError) + +instance FromJSON NetworkError where + parseJSON = $(J.mkParseJSON (sumTypeJSON $ dropPrefix "NE") ''NetworkError) + omittedField = Just NEFailedError $(J.deriveJSON (sumTypeJSON id) ''BrokerErrorType)