Fix #27 Confirmation code should be number input
This commit is contained in:
parent
94660fb812
commit
55396a20c4
|
@ -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]))
|
||||||
|
|
|
@ -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"}])
|
Loading…
Reference in New Issue