3pp-mirror/penpot
1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-07-30 14:08:21 +02:00
Code Issues Projects Releases Packages Wiki Activity

🎉 Add more helpers on srepl ns

Browse source
This commit is contained in:
Andrey Antukh 2022-11-01 09:43:02 +01:00 • committed by Andrés Moya
parent c027de2592
commit a42d7164ad
2 changed files with 40 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

7
backend/src/app/srepl/helpers.clj
View file

@ -30,6 +30,8 @@
[cuerdas.core :as str]
[expound.alpha :as expound]))
(def ^:dynamic *conn*)
(defn reset-password!
"Reset a password to a specific one for a concrete user or all users
if email is `:all` keyword."
@ -69,8 +71,9 @@
(update :features db/decode-pgarray #{})
(update :data blob/decode)
(cond-> migrate? (update :data pmg/migrate-data)))
file (-> (update-fn file)
(cond-> inc-revn? (update :revn inc)))]
file (binding [*conn* conn]
(-> (update-fn file)
(cond-> inc-revn? (update :revn inc))))]
(when save?
(let [features (db/create-array conn "text" (:features file))
data (blob/encode (:data file))]