{-# LANGUAGE CPP #-}
#ifdef HAS_BOTH_AESON_AND_BENCHMARKS
{-# LANGUAGE PackageImports #-}
#endif
module Twitter.Options (module Twitter.Options) where
#ifndef HAS_BOTH_AESON_AND_BENCHMARKS
import Data.Aeson
import Data.Aeson.Types
#else
import "aeson" Data.Aeson
import "aeson" Data.Aeson.Types
import qualified "aeson-benchmarks" Data.Aeson as B
import qualified "aeson-benchmarks" Data.Aeson.Types as B
#endif
twitterOptions :: Options
twitterOptions = defaultOptions
{ fieldLabelModifier = \x -> case x of
"id_" -> "id"
_ -> x
}
#ifdef HAS_BOTH_AESON_AND_BENCHMARKS
btwitterOptions :: B.Options
btwitterOptions = B.defaultOptions
{ B.fieldLabelModifier = \x -> case x of
"id_" -> "id"
_ -> x
}
#endif