From 5e5b4fa2cf5a8fc2f974861aee107413617c612d Mon Sep 17 00:00:00 2001 From: Julien Eluard Date: Tue, 13 Jun 2017 23:38:12 +0200 Subject: [PATCH] Tap on return permits sign-in. Fixes #1285 --- src/status_im/accounts/login/screen.cljs | 9 ++++++--- 1 file changed, 6 insertions(+), 3 deletions(-) diff --git a/src/status_im/accounts/login/screen.cljs b/src/status_im/accounts/login/screen.cljs index 57806d55d7..4e91382d4c 100644 --- a/src/status_im/accounts/login/screen.cljs +++ b/src/status_im/accounts/login/screen.cljs @@ -24,6 +24,10 @@ (def password-text-input (atom nil)) +(defn login-account [password-text-input address password] + (.blur @password-text-input) + (dispatch [:login-account address password])) + (defview login [] [{:keys [address photo-path name password error processing]} [:get :login]] [view ast/accounts-container @@ -40,13 +44,12 @@ :on-change-text #(do (dispatch [:set-in [:login :password] %]) (dispatch [:set-in [:login :error] ""])) + :on-submit-editing #(login-account password-text-input address password) :auto-focus true :secure-text-entry true :error (when (pos? (count error)) (i18n/label :t/wrong-password))}]] [view {:margin-top 16} - [touchable-highlight {:on-press #(do - (.blur @password-text-input) - (dispatch [:login-account address password]))} + [touchable-highlight {:on-press #(login-account password-text-input address password)} [view st/sign-in-button [text {:style st/sign-it-text} (i18n/label :t/sign-in)]]]]] (when processing