3pp-mirror/penpot
1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-06-02 02:43:01 +02:00
Code Issues Projects Releases Packages Wiki Activity

🎉 Add newsletter subscription modal

Browse source
This commit is contained in:
Eva 2022-03-22 18:27:06 +01:00 • committed by Andrey Antukh
parent b7e0619e9a
commit 5e7e055539
14 changed files with 270 additions and 19 deletions
Download patch file Download diff file Expand all files Collapse all files

17
backend/src/app/rpc/mutations/profile.clj
View file

@ -342,13 +342,26 @@
;; --- MUTATION: Update Profile (own)
(defn- update-profile-newsletter-subscribed
[conn profile-id newsletter-subscribed]
(let [profile (profile/retrieve-profile-data conn profile-id)
props (:props profile)
props (assoc props :newsletter-subscribed newsletter-subscribed)
]
(db/update! conn :profile
{:props (db/tjson props)}
{:id profile-id})))
(defn- update-profile
[conn {:keys [id fullname lang theme] :as params}]
[conn {:keys [id fullname lang theme newsletter-subscribed] :as params}]
(let [profile (db/update! conn :profile
{:fullname fullname
:lang lang
:theme theme}
{:id id})]
{:id id})
profile (if (some? newsletter-subscribed)
(update-profile-newsletter-subscribed conn id newsletter-subscribed)
profile)]
(-> profile
(profile/decode-profile-row)
(profile/strip-private-attrs))))