fixup! refactor

exoscale · Jan 28, 2025 · 8f73ef6 · 8f73ef6
1 parent 4fa43bf
commit 8f73ef6
Showing 1 changed file with 6 additions and 2 deletions.
diff --git a/src/spootnik/reporter/alert.clj b/src/spootnik/reporter/alert.clj
@@ -60,14 +60,18 @@
       generator-url
       (assoc :generatorURL generator-url))))
 
+(defn- alerts-body
+  [alerts]
+  (json/write-value-as-string
+   {:alerts (map (fn [alert] (->alert alert)) alerts)}))
+
 (defrecord AlephClient [])
 
 (extend-protocol Alert
   AlephClient
   (msend! [client alerts]
     @(http/post "/api/v2/alerts"
-                (into {:body (json/write-value-as-string
-                              {:alerts (map (fn [alert] (->alert alert)) alerts)})
+                (into {:body (alerts-body alerts)
                        :headers {"Content-Type" "application/json; charset=utf-8"}}
                       client)))
   (send! [client alert]