Fix #27 Confirmation code should be number input

This commit is contained in:
virvar 2016-04-25 12:25:33 +03:00
parent 94660fb812
commit 55396a20c4
2 changed files with 11 additions and 0 deletions

View File

@ -11,6 +11,7 @@
[syng-im.components.chat.input.simple-command :refer [simple-command-input-view]] [syng-im.components.chat.input.simple-command :refer [simple-command-input-view]]
[syng-im.components.chat.input.phone :refer [phone-input-view]] [syng-im.components.chat.input.phone :refer [phone-input-view]]
[syng-im.components.chat.input.password :refer [password-input-view]] [syng-im.components.chat.input.password :refer [password-input-view]]
[syng-im.components.chat.input.confirmation-code :refer [confirmation-code-input-view]]
[syng-im.components.chat.input.money :refer [money-input-view]] [syng-im.components.chat.input.money :refer [money-input-view]]
[syng-im.components.chat.input.simple-command-staged :refer [simple-command-staged-view]] [syng-im.components.chat.input.simple-command-staged :refer [simple-command-staged-view]]
[syng-im.utils.utils :refer [log toast http-post]] [syng-im.utils.utils :refer [log toast http-post]]
@ -33,6 +34,7 @@
(case (:command command) (case (:command command)
:phone [phone-input-view command] :phone [phone-input-view command]
:keypair-password [password-input-view command] :keypair-password [password-input-view command]
:confirmation-code [confirmation-code-input-view command]
:money [money-input-view command] :money [money-input-view command]
:request [money-input-view command] :request [money-input-view command]
[default-command-input-view command])) [default-command-input-view command]))

View File

@ -0,0 +1,9 @@
(ns syng-im.components.chat.input.confirmation-code
(:require
[re-frame.core :refer [subscribe dispatch dispatch-sync]]
[syng-im.components.chat.input.simple-command :refer [simple-command-input-view]]
[syng-im.utils.utils :refer [log toast http-post]]
[syng-im.utils.logging :as log]))
(defn confirmation-code-input-view [command]
[simple-command-input-view command {:keyboardType "numeric"}])