From 75162432e3a2c19feb75ea6fa7e1c4aca07ba2be Mon Sep 17 00:00:00 2001 From: Vitaliy Vlasov Date: Wed, 10 Jul 2019 00:13:43 +0300 Subject: [PATCH] Fix onboarding notifications request Signed-off-by: Andrey Shovkoplyas --- src/status_im/accounts/create/core.cljs | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/src/status_im/accounts/create/core.cljs b/src/status_im/accounts/create/core.cljs index 5aee910e26..f60d7b1de2 100644 --- a/src/status_im/accounts/create/core.cljs +++ b/src/status_im/accounts/create/core.cljs @@ -164,8 +164,7 @@ (navigation/navigate-to-clean :intro nil))))) (fx/defn exit-wizard [{:keys [db] :as cofx}] - (fx/merge {:db (dissoc db :intro-wizard) - :notifications/request-notifications-permissions nil} + (fx/merge {:db (dissoc db :intro-wizard)} (navigation/navigate-to-cofx :home nil))) (fx/defn init-key-generation [{:keys [db] :as cofx}] @@ -199,7 +198,9 @@ [{:keys [db] :as cofx} {:keys [skip?] :as opts}] (let [step (get-in db [:intro-wizard :step])] (cond (= step :enable-notifications) - (exit-wizard cofx) + (fx/merge cofx + (when-not skip? {:notifications/request-notifications-permissions nil}) + exit-wizard) (= step :generate-key) (init-key-generation cofx)