fixed signin blinking
Signed-off-by: Andrey Shovkoplyas <motor4ik@gmail.com>
This commit is contained in:
parent
0f2aaa35e3
commit
e9cb6b01e7
|
@ -112,14 +112,14 @@
|
||||||
success (zero? (count error))
|
success (zero? (count error))
|
||||||
db' (assoc-in db [:accounts/login :processing] false)]
|
db' (assoc-in db [:accounts/login :processing] false)]
|
||||||
(if success
|
(if success
|
||||||
{:db db'
|
{:db db
|
||||||
::clear-web-data nil
|
::clear-web-data nil
|
||||||
::change-account [address]}
|
::change-account [address]}
|
||||||
{:db (assoc-in db' [:accounts/login :error] error)}))))
|
{:db (assoc-in db' [:accounts/login :error] error)}))))
|
||||||
|
|
||||||
(register-handler-fx
|
(register-handler-fx
|
||||||
:change-account-handler
|
:change-account-handler
|
||||||
(fn [{{:keys [accounts/accounts view-id] :as db} :db} [_ error address]]
|
(fn [{{:keys [view-id] :as db} :db} [_ error address]]
|
||||||
(if (nil? error)
|
(if (nil? error)
|
||||||
{:db (cond-> (dissoc db :accounts/login)
|
{:db (cond-> (dissoc db :accounts/login)
|
||||||
(= view-id :create-account)
|
(= view-id :create-account)
|
||||||
|
|
Loading…
Reference in New Issue