diff --git a/src/PaymentServer/Processors/Stripe.hs b/src/PaymentServer/Processors/Stripe.hs index 26bd10de5d9a568010f5519c43ed4c2cb5e9ade9..ec03171ac2b1e03494df692cfc2aafedcb3b53b2 100644 --- a/src/PaymentServer/Processors/Stripe.hs +++ b/src/PaymentServer/Processors/Stripe.hs @@ -22,9 +22,6 @@ import Data.Text ( Text , unpack ) -import Text.Printf - ( printf - ) import Text.Read ( readMaybe ) @@ -51,7 +48,7 @@ import Servant.API , (:<|>)((:<|>)) ) import Web.Stripe.Event - ( Event(Event, eventId, eventCreated, eventLiveMode, eventType, eventData, eventObject, eventPendingWebHooks, eventRequest) + ( Event(Event, eventId, eventType, eventData) , EventId(EventId) , EventType(ChargeSucceededEvent) , EventData(ChargeEvent)