module Network.SendGridV3.JSON where import Data.Aeson ( camelTo2 ) -- | Format a prefixed record field for SendGrid API consumption unPrefix :: String -> String -> String unPrefix :: String -> String -> String unPrefix String prefix = Char -> String -> String camelTo2 Char '_' forall b c a. (b -> c) -> (a -> b) -> a -> c . forall a. Int -> [a] -> [a] drop (forall (t :: * -> *) a. Foldable t => t a -> Int length String prefix)