3pp-mirror/penpot
1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-05-31 21:41:38 +02:00
Code Issues Projects Releases Packages Wiki Activity

🐛 Fix incorrect password encoding on create-profile manage command

Browse source
This commit is contained in:
Andrey Antukh 2024-05-23 14:42:28 +02:00
parent 632165d6dc
commit b357cf505d
2 changed files with 12 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

14
backend/src/app/srepl/cli.clj
View file

@ -12,6 +12,7 @@
[app.common.uuid :as uuid]
[app.db :as db]
[app.rpc.commands.auth :as cmd.auth]
[app.rpc.commands.profile :as cmd.profile]
[app.util.json :as json]
[app.util.time :as dt]
[cuerdas.core :as str]))
@ -37,12 +38,13 @@
:or {is-active true}}]
(when-let [system (get-current-system)]
(db/with-atomic [conn (:app.db/pool system)]
(let [params {:id (uuid/next)
:email email
:fullname fullname
:is-active is-active
:password password
:props {}}]
(let [password (cmd.profile/derive-password system password)
params {:id (uuid/next)
:email email
:fullname fullname
:is-active is-active
:password password
:props {}}]
(->> (cmd.auth/create-profile! conn params)
(cmd.auth/create-profile-rels! conn))))))