Skip to content
Snippets Groups Projects
Commit 63d883d5 authored by Jean-Paul Calderone's avatar Jean-Paul Calderone
Browse files

Affirm success somewhat more explicitly

parent 431e8af8
No related branches found
No related tags found
1 merge request!39CORS headers on Stripe charge API responses
...@@ -92,7 +92,9 @@ type StripeSecretKey = ByteString ...@@ -92,7 +92,9 @@ type StripeSecretKey = ByteString
data Acknowledgement = Ok data Acknowledgement = Ok
instance ToJSON Acknowledgement where instance ToJSON Acknowledgement where
toJSON Ok = object [] toJSON Ok = object
[ "success" .= True
]
type StripeAPI = ChargesAPI type StripeAPI = ChargesAPI
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment