diff --git a/src/Simplex/Messaging/Parsers.hs b/src/Simplex/Messaging/Parsers.hs index ce4cd1f34..a54503c46 100644 --- a/src/Simplex/Messaging/Parsers.hs +++ b/src/Simplex/Messaging/Parsers.hs @@ -118,6 +118,7 @@ taggedObjectJSON :: (String -> String) -> J.Options taggedObjectJSON tagModifier = J.defaultOptions { J.sumEncoding = J.TaggedObject "type" "data", + J.tagSingleConstructors = True, J.constructorTagModifier = tagModifier, J.allNullaryToStringTag = False, J.nullaryToObject = True, @@ -128,6 +129,7 @@ singleFieldJSON :: (String -> String) -> J.Options singleFieldJSON tagModifier = J.defaultOptions { J.sumEncoding = J.ObjectWithSingleField, + J.tagSingleConstructors = True, J.constructorTagModifier = tagModifier, J.allNullaryToStringTag = False, J.nullaryToObject = True,