git.iko.soy/typeable/connexpay
on master help sign in
typo
commita474643854d5658dfbc19dcb167ef1b2234739f6 authorYuras Shumovich <shumovichy@gmail.com> dateMon 9 Sep 2024, 10:23 (2 years ago) parent2ae6bfc
1 file changed+1−1
compare with master
unifiedsplit
connexpay/src/Web/Connexpay/Payments.hs+1−1
connexpay/src/Web/Connexpay/Payments.hs+1−1
@@ -204,7 +204,7 @@ cancelPayment pid = sendRequest_ "cancel" body
204204returnPayment :: SaleGuid -- ^ Sales GUID, obtained from 'capturePayment'.
205205 -> Maybe (Money USD)
206206 -> ConnexpayM ()
207−returnPayment pid amt = sendRequest_ "return" body
207+returnPayment pid amt = sendRequest_ "returns" body
208208 where body = execWriter $
209209 do tell [ "SaleGuid" .= show pid ]
210210 whenJust amt $ \m ->