[#29] Handle 429 error properly

Return ::anomalies/busy with proper error body.

Author: roman-rudakov

ChangeLog.md

@@ -7,6 +7,12 @@ The format is based on [Keep a Changelog](https://keepachangelog.com/en/1.0.0/),
 
 ## [Unreleased] ##
 
+## [0.4.1] - 2024-03-18 ##
+
+### Fixed ###
+
+- HTTP error code 429 is not handled properly ([#29](https://github.com/AdGoji/mollie/issues/29)).
+
 ## [0.4.0] - 2024-02-28 ##
 
 ### Added ###
@@ -94,7 +100,8 @@ The format is based on [Keep a Changelog](https://keepachangelog.com/en/1.0.0/),
 - Mandates management ([#1](https://github.com/AdGoji/mollie/issues/1)).
 - Subscriptions management ([#1](https://github.com/AdGoji/mollie/issues/1)).
 
-[unreleased]: https://github.com/AdGoji/mollie/compare/0.4.0..HEAD
+[unreleased]: https://github.com/AdGoji/mollie/compare/0.4.1..HEAD
+[0.4.1]: https://github.com/AdGoji/mollie/compare/0.4.0..0.4.1
 [0.4.0]: https://github.com/AdGoji/mollie/compare/0.3.6..0.4.0
 [0.3.6]: https://github.com/AdGoji/mollie/compare/0.3.5..0.3.6
 [0.3.5]: https://github.com/AdGoji/mollie/compare/0.3.4..0.3.5

build.clj

@@ -4,7 +4,7 @@
    [deps-deploy.deps-deploy :as dd]))
 
 (def lib 'com.adgoji/mollie)
-(def version "0.4.0")
+(def version "0.4.1")
 (def class-dir "target/classes")
 (def basis (b/create-basis {:project "deps.edn"}))
 (def jar-file (format "target/%s-%s.jar" (name lib) version))

src/com/adgoji/mollie/client.clj

@@ -89,7 +89,7 @@
                        (404 410)         ::anomalies/not-found
                        405               ::anomalies/unsupported
                        500               ::anomalies/fault
-                       503               ::anomalies/busy)
+                       (429 503)         ::anomalies/busy)
              error   {::anomalies/category anomaly
                       :error               body}]
          (if throw-exceptions?