diff --git a/src/Handler/Utils/Servant/AVS.hs b/src/Handler/Utils/Servant/AVS.hs index afcb50a4e..0e332bbac 100644 --- a/src/Handler/Utils/Servant/AVS.hs +++ b/src/Handler/Utils/Servant/AVS.hs @@ -25,7 +25,7 @@ instance Default AvsPersonQuery where deriveJSON defaultOptions { fieldLabelModifier = mconcat . drop 3 . splitCamel , omitNothingFields = True - , tagSingleConstructors = True + , tagSingleConstructors = False } ''AvsPersonQuery {-