src/Gargantext/Utils/Aeson.hs

   1 module Gargantext.Utils.Aeson where
   2
   3 import Data.Aeson.Types
   4
   5 -- this is what purescript Simple.JSON generics assumes
   6 defaultTaggedObject :: SumEncoding
   7 defaultTaggedObject = TaggedObject { tagFieldName = "type", contentsFieldName = "value" }