♻️ Replace mount with integrant.

backend/src/app/tasks/sendmail.clj

@@ -9,15 +9,50 @@
 
 (ns app.tasks.sendmail
   (:require
+   [app.common.spec :as us]
    [app.config :as cfg]
    [app.metrics :as mtx]
    [app.util.emails :as emails]
-   [clojure.tools.logging :as log]))
+   [clojure.tools.logging :as log]
+   [clojure.spec.alpha :as s]
+   [integrant.core :as ig]))
+
+(declare handler)
+
+(s/def ::username ::cfg/smtp-username)
+(s/def ::password ::cfg/smtp-password)
+(s/def ::tls ::cfg/smtp-tls)
+(s/def ::ssl ::cfg/smtp-ssl)
+(s/def ::host ::cfg/smtp-host)
+(s/def ::port ::cfg/smtp-port)
+(s/def ::default-reply-to ::cfg/smtp-default-reply-to)
+(s/def ::default-from ::cfg/smtp-default-from)
+(s/def ::enabled ::cfg/smtp-enabled)
+
+(defmethod ig/pre-init-spec ::handler [_]
+  (s/keys :req-un [::enabled ::mtx/metrics]
+          :opt-un [::username
+                   ::password
+                   ::tls
+                   ::ssl
+                   ::host
+                   ::port
+                   ::default-from
+                   ::default-reply-to]))
+
+(defmethod ig/init-key ::handler
+  [_ {:keys [metrics] :as cfg}]
+  (let [handler #(handler cfg %)]
+    (->> {:registry (:registry metrics)
+          :type :summary
+          :name "task_sendmail_timing"
+          :help "sendmail task timing"}
+         (mtx/instrument handler))))
 
 (defn- send-console!
-  [config email]
+  [cfg email]
   (let [baos (java.io.ByteArrayOutputStream.)
-        mesg (emails/smtp-message config email)]
+        mesg (emails/smtp-message cfg email)]
     (.writeTo mesg baos)
     (let [out (with-out-str
                 (println "email console dump:")
@@ -27,14 +62,7 @@
       (log/info out))))
 
 (defn handler
-  {:app.tasks/name "sendmail"}
-  [{:keys [props] :as task}]
-  (let [config (cfg/smtp cfg/config)]
-    (if (:enabled config)
-      (emails/send! config props)
-      (send-console! config props))))
-
-(mtx/instrument-with-summary!
- {:var #'handler
-  :id "tasks__sendmail"
-  :help "Timing of sendmail task."})
+  [cfg {:keys [props] :as task}]
+  (if (:enabled cfg)
+    (emails/send! cfg props)
+    (send-console! cfg props)))