status-im/status-mobile
2
0
Fork 0
mirror of https://github.com/status-im/status-mobile.git synced 2025-02-04 12:55:03 +00:00
Code Issues Projects Releases Wiki Activity

Fix #22 Confirmation code stops after first try

Browse Source 
Former-commit-id: 94660fb812399eca450f3302a1395b2e5bdf2e30
This commit is contained in:
virvar 2016-04-25 12:06:59 +03:00
parent cc8d92193a
commit 0b43cbf089
1 changed files with 6 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
src/syng_im/handlers/sign_up.cljs
View File

@ -40,9 +40,10 @@
(defn sync-contacts []
(dispatch [:sync-contacts on-sync-contacts]))
(defn on-send-code-response [body]
(defn on-send-code-response [msg-id body]
(if (:confirmed body)
(do (dispatch [:received-msg
(do (dispatch [:set-chat-command-request msg-id nil])
(dispatch [:received-msg
{:msg-id (random/id)
:content "Confirmed"
:content-type text-content-type
@ -58,13 +59,12 @@
:from "console"
:to "me"}])))
(defn send-code [code]
(dispatch [:sign-up-confirm code on-send-code-response]))
(defn send-code [msg-id code]
(dispatch [:sign-up-confirm code (partial on-send-code-response msg-id)]))
(defn- handle-confirmation-code [msg-id command-key content]
(dispatch [:set-chat-command-request msg-id nil])
(when (= command-key :confirmation-code)
(send-code content)))
(send-code msg-id content)))
;; -- Send phone number ----------------------------------------
(defn on-sign-up-response []