module Web.Telegraph.Utils where import Data.Aeson sumUntagged :: Options sumUntagged :: Options sumUntagged = Options defaultOptions {sumEncoding :: SumEncoding sumEncoding = SumEncoding UntaggedValue} snake :: Options snake :: Options snake = Options defaultOptions {fieldLabelModifier :: String -> String fieldLabelModifier = Char -> String -> String camelTo2 Char '_', omitNothingFields :: Bool omitNothingFields = Bool True}