summaryrefslogtreecommitdiffhomepage
path: root/JSON.hs
blob: c8a6654c386018ac9fa8eaa1cd9f493f21e7578e (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
{- Copyright 2017 Joey Hess <id@joeyh.name>
 -
 - Licensed under the GNU AGPL version 3 or higher.
 -}

module JSON (
	module Data.Aeson,
	Generic,
	sumOptions
) where

import GHC.Generics (Generic)
import Data.Aeson
import qualified Data.Aeson.Types as Aeson

-- | Nicer JSON encoding for sum types.
sumOptions :: Aeson.Options
sumOptions = defaultOptions { Aeson.sumEncoding = Aeson.ObjectWithSingleField }