addReCaptchaHeist :: Snaplet (Heist b) -> BS.ByteString -> Initializer b v ()
addReCaptchaHeist heist site = addConfig heist $ mempty &~ do
  scCompiledSplices .= do
    "recaptcha-div"    ## pureSplice id (return (recaptchaDiv site))
    "recaptcha-script" ## pureSplice id (return recaptchaScript)

-- | @<script src='https://www.google.com/recaptcha/api.js' async defer></script> @
addReCaptchaHeist :: Snaplet (Heist b) -> BS.ByteString -> Initializer b v ()
addReCaptchaHeist heist site = addConfig heist $ mempty &~ do
  scCompiledSplices .= do
    "recaptcha-div"    ## pureSplice id (return (recaptchaDiv site))
    "recaptcha-script" ## pureSplice id (return recaptchaScript)

-- | @<script src='https://www.google.com/recaptcha/api.js' async defer></script> @
addReCaptchaHeist heist site = addConfig heist $ mempty &~ do
  scCompiledSplices .= do
    "recaptcha-div"    ## pureSplice id (return (recaptchaDiv site))
    "recaptcha-script" ## pureSplice id (return recaptchaScript)

-- | @<script src='https://www.google.com/recaptcha/api.js' async defer></script> @