fixup! [wip]

deps.edn

@@ -5,7 +5,6 @@
   camel-snake-kebab/camel-snake-kebab {:mvn/version "0.4.2"}
   exoscale/ex {:mvn/version "0.4.1"}
   com.stuartsierra/component {:mvn/version "1.0.0"}
-  exoscale/telex {:mvn/version "0.1.7"}
   io.prometheus/simpleclient {:mvn/version "0.12.0"}
   io.prometheus/simpleclient_common {:mvn/version "0.12.0"}
   io.prometheus/simpleclient_dropwizard {:mvn/version "0.12.0"}

src/spootnik/reporter/alert.clj

@@ -1,14 +1,11 @@
 (ns spootnik.reporter.alert
-  (:require [clojure.spec.alpha :as s]
+  (:require [aleph.http :as http]
+            [clojure.spec.alpha :as s]
             [exoscale.ex :as ex]
-            [exoscale.telex :as http]
             [jsonista.core :as json])
   (:import (java.net.http HttpClient)
            (java.time Instant)))
 
-(defprotocol Alert
-  (-send! [client alerts opts]))
-
 (s/def ::named (s/or :k ident? :s string?))
 
 (s/def :spootnik.reporter.alert.annotation/key ::named)
@@ -54,14 +51,9 @@
       generator-url
       (assoc :generatorURL generator-url))))
 
-(extend-protocol Alert
-  HttpClient
-  (-send! [client alert opts]
-    (http/request client
-                  {:url "/api/v2/alerts"
-                   :body (json/write-value-as-string
-                          {:alerts [(->alert (into alert opts))]})})))
-
 (defn send!
-  ([client alert opts]
-   (-send! client alert opts)))
+  ([alert opts]
+   (http/post "/api/v2/alerts"
+              (into {:body (json/write-value-as-string
+                            {:alerts [(->alert (into alert opts))]})}
+                    opts))))