mirror of
https://github.com/penpot/penpot.git
synced 2025-01-08 07:50:43 -05:00
🐛 Fix incorrect password encoding on create-profile manage command
This commit is contained in:
parent
4c7a30a029
commit
29ef9f752a
1 changed files with 8 additions and 6 deletions
|
@ -12,6 +12,7 @@
|
||||||
[app.common.uuid :as uuid]
|
[app.common.uuid :as uuid]
|
||||||
[app.db :as db]
|
[app.db :as db]
|
||||||
[app.rpc.commands.auth :as cmd.auth]
|
[app.rpc.commands.auth :as cmd.auth]
|
||||||
|
[app.rpc.commands.profile :as cmd.profile]
|
||||||
[app.util.json :as json]
|
[app.util.json :as json]
|
||||||
[app.util.time :as dt]
|
[app.util.time :as dt]
|
||||||
[cuerdas.core :as str]))
|
[cuerdas.core :as str]))
|
||||||
|
@ -37,12 +38,13 @@
|
||||||
:or {is-active true}}]
|
:or {is-active true}}]
|
||||||
(when-let [system (get-current-system)]
|
(when-let [system (get-current-system)]
|
||||||
(db/with-atomic [conn (:app.db/pool system)]
|
(db/with-atomic [conn (:app.db/pool system)]
|
||||||
(let [params {:id (uuid/next)
|
(let [password (cmd.profile/derive-password system password)
|
||||||
:email email
|
params {:id (uuid/next)
|
||||||
:fullname fullname
|
:email email
|
||||||
:is-active is-active
|
:fullname fullname
|
||||||
:password password
|
:is-active is-active
|
||||||
:props {}}]
|
:password password
|
||||||
|
:props {}}]
|
||||||
(->> (cmd.auth/create-profile! conn params)
|
(->> (cmd.auth/create-profile! conn params)
|
||||||
(cmd.auth/create-profile-rels! conn))))))
|
(cmd.auth/create-profile-rels! conn))))))
|
||||||
|
|
||||||
|
|
Loading…
Reference in a new issue