Ask PN permissions on iOS when account recovered

Signed-off-by: Julien Eluard <julien.eluard@gmail.com>
This commit is contained in:
Dmitry Novotochinov 2018-05-18 20:29:43 +03:00 committed by Julien Eluard
parent a9e640a55d
commit fd77796cba
No known key found for this signature in database
GPG Key ID: 6FD7DB5437FCBEF6
2 changed files with 4 additions and 4 deletions

View File

@ -128,13 +128,13 @@
(fn [{{:accounts/keys [create] :as db} :db :as cofx} _] (fn [{{:accounts/keys [create] :as db} :db :as cofx} _]
(handlers-macro/merge-fx cofx (handlers-macro/merge-fx cofx
{:db db {:db db
:dispatch [:navigate-to-clean :usage-data [:account-finalized]]} :dispatch [:navigate-to-clean :usage-data [:account-finalized true]]}
(accounts.utils/account-update {:name (:name create)})))) (accounts.utils/account-update {:name (:name create)}))))
(handlers/register-handler-fx (handlers/register-handler-fx
:account-finalized :account-finalized
(fn [{db :db} _] (fn [{db :db} [_ show-welcome?]]
{:db (assoc db :accounts/create {:show-welcome? true}) {:db (assoc db :accounts/create {:show-welcome? show-welcome?})
:dispatch-n [[:navigate-to-clean :home] :dispatch-n [[:navigate-to-clean :home]
[:request-notifications]]})) [:request-notifications]]}))

View File

@ -45,7 +45,7 @@
(-> db (-> db
(accounts-events/add-account account) (accounts-events/add-account account)
(assoc :dispatch [:login-account address password]) (assoc :dispatch [:login-account address password])
(assoc :dispatch-later [{:ms 2000 :dispatch [:navigate-to :usage-data]}])))))) (assoc :dispatch-later [{:ms 2000 :dispatch [:navigate-to :usage-data [:account-finalized false]]}]))))))
(handlers/register-handler-fx (handlers/register-handler-fx
:recover-account :recover-account