github/penpot
1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2026-09-24 12:56:15 +00:00
Code Issues Packages Projects Releases Wiki Activity

🐛 Fix redirect to send email screen after a successful registration

Browse Source
This commit is contained in:
Luis de Dios 2026-09-17 16:23:04 +02:00
parent f3ca997d2a
commit 1ffb6c21c7
3 changed files with 26 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
frontend/src/app/main/ui/auth/register.cljs
View File

@ -125,7 +125,7 @@
(mf/deps on-success-callback) (mf/deps on-success-callback)
(fn [params] (fn [params]
(if (fn? on-success-callback) (if (fn? on-success-callback)
(on-success-callback (:email params)) (on-success-callback params)
(cond (cond
(some? (:invitation-token params)) (some? (:invitation-token params))
(let [token (:invitation-token params)] (let [token (:invitation-token params)]

17
frontend/src/app/main/ui/static.cljs
View File

@ -125,13 +125,22 @@
success-register success-register
(mf/use-fn (mf/use-fn
(fn [data] (fn [data]
(reset! register-token (:token data)) (cond
(reset! current-section :register-validate))) (:invitation-token data)
(st/emit! (rt/nav :auth-verify-token {:token (:invitation-token data)}))
(:is-active data)
(st/emit! (rt/reload true))
:else
(do
(reset! user-email (:email data))
(reset! current-section :register-email-sent)))))
register-email-sent register-email-sent
(mf/use-fn (mf/use-fn
(fn [email] (fn [data]
(reset! user-email email) (reset! user-email (if (string? data) data (:email data)))
(reset! current-section :register-email-sent))) (reset! current-section :register-email-sent)))
recovery-email-sent recovery-email-sent

14
frontend/src/app/main/ui/viewer/login.cljs
View File

@ -9,6 +9,7 @@
(:require (:require
[app.common.logging :as log] [app.common.logging :as log]
[app.main.data.modal :as modal] [app.main.data.modal :as modal]
[app.main.router :as rt]
[app.main.store :as st] [app.main.store :as st]
[app.main.ui.auth.login :refer [login-dialog*]] [app.main.ui.auth.login :refer [login-dialog*]]
[app.main.ui.auth.recovery-request :refer [recovery-request-page*]] [app.main.ui.auth.recovery-request :refer [recovery-request-page*]]
@ -68,8 +69,17 @@
success-register success-register
(fn [data] (fn [data]
(reset! register-token (:token data)) (cond
(set-current-section :register-validate))] (:invitation-token data)
(st/emit! (rt/nav :auth-verify-token {:token (:invitation-token data)}))
(:is-active data)
(st/emit! (modal/hide))
:else
(do
(reset! user-email (:email data))
(set-current-section :email-sent))))]
[:div {:class (stl/css :modal-overlay)} [:div {:class (stl/css :modal-overlay)}
[:div {:class (stl/css :modal-container)} [:div {:class (stl/css :modal-container)}