         message (str fullname "\n\n" (t :core/Emailverification2 lng) " '" email "' " (t :core/Emailverification3 lng) " " site-url".\n" (t :core/Emailverification4 lng) ":\n\n"
                      email-verification-link
                      "\n\n" (t :core/Emailverification6 lng)".\n")]
-    (send-mail ctx subject message [email])))
+    (log/info "sending to" email)
+    (-> (send-mail ctx subject message [email]) log/info)))
 
 
 

                     activation-link
                     "\n\n" (t :core/Emailactivation5 lng) "\n" (t :core/Emailactivation6 lng) ".\n\n" (t :core/Emailresetmessage2 lng) ".\n\n--  "
                      site-name " -"(t :core/Team lng))]
    (send-mail ctx subject message [email-address])))

(defn send-verification [ctx site-url email-verification-link fullname email lng]
  (let [site-name (get-in ctx [:config :core :site-name])

      (if (nil? mail-host-config)
        (send-message data)
        (send-message mail-host-config data)))
    (catch Object ex
      ex)))

(defn send-html-mail [ctx subject message recipients]
  (try+
