@@ -142,7 +142,6 @@ toOneTimeParts :: Int -> [(BS.ByteString, BS.ByteString)]
142toOneTimeParts cents =
142toOneTimeParts cents =
143 [ "payment_method_types[]" ==> "card"
143 [ "payment_method_types[]" ==> "card"
144 , "line_items[][name]" ==> "One-time donation"
144 , "line_items[][name]" ==> "One-time donation"
145− , "line_items[][description]" ==> "One-time donation to Elm Software Foundation"
146 , "line_items[][images][]" ==> "https://foundation.elm-lang.org/donation.png"
145 , "line_items[][images][]" ==> "https://foundation.elm-lang.org/donation.png"
147 , "line_items[][amount]" ==> BSC.pack (show cents)
146 , "line_items[][amount]" ==> BSC.pack (show cents)
148 , "line_items[][currency]" ==> "usd"
147 , "line_items[][currency]" ==> "usd"