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)