Penpot/penpot
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-02-03 12:59:12 -05:00
Code Issues Activity

✨ Minor changes on email sending internals.

Browse source
This commit is contained in:
Andrey Antukh 2021-01-19 11:30:40 +01:00 • committed by Alonso Torres
parent af310854fc
commit b7a90eb4e4
2 changed files with 7 additions and 7 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
backend/src/app/tasks/sendmail.clj
View file

@ -5,7 +5,7 @@
;; This Source Code Form is "Incompatible With Secondary Licenses", as
;; defined by the Mozilla Public License, v. 2.0.
;;
;; Copyright (c) 2020 UXBOX Labs SL
;; Copyright (c) 2020-2021 UXBOX Labs SL
(ns app.tasks.sendmail
(:require

12
backend/src/app/util/emails.clj
View file

@ -91,8 +91,8 @@
^String charset))
(defn- assign-extra-headers
[^MimeMessage mmsg {:keys [headers custom-data] :as params}]
(let [headers (assoc headers "X-Sereno-Custom-Data" custom-data)]
[^MimeMessage mmsg {:keys [headers extra-data] :as params}]
(let [headers (assoc headers "X-Penpot-Data" extra-data)]
(reduce-kv (fn [^MimeMessage mmsg k v]
(doto mmsg
(.addHeader (name k) (str v))))
@ -223,11 +223,11 @@
(s/def ::from ::us/email)
(s/def ::reply-to ::us/email)
(s/def ::lang string?)
(s/def ::custom-data ::us/string)
(s/def ::extra-data ::us/string)
(s/def ::context
(s/keys :req-un [::to]
:opt-un [::reply-to ::from ::lang ::priority ::custom-data]))
:opt-un [::reply-to ::from ::lang ::priority ::extra-data]))
(defn template-factory
([id] (template-factory id {}))
@ -249,8 +249,8 @@
:hint "seems like the template is wrong or does not exists."
:context {:id id}))
(cond-> (assoc email :id (name id))
(:custom-data context)
(assoc :custom-data (:custom-data context))
(:extra-data context)
(assoc :extra-data (:extra-data context))
(:from context)
(assoc :from (:from context))