Updating profile names (#659), fixing small iOS bug caused by #809

This commit is contained in:
alwx 2017-02-20 09:42:17 +02:00 committed by Roman Volosovskyi
parent 6ec0c4d6f7
commit 64adf43902
2 changed files with 26 additions and 19 deletions

View File

@ -24,18 +24,31 @@
[view st/send-container [view st/send-container
[icon :send st/send-icon]]]]) [icon :send st/send-icon]]]])
(defn plain-input-options [disable?] (defn plain-input-options [{:keys [set-layout-size-fn disable?]}]
{:style st-message/message-input {:style st-message/message-input
:on-change-text (when-not disable? plain-message/set-input-message) :on-change-text (when-not disable? plain-message/set-input-message)
:editable (not disable?) :on-submit-editing plain-message/send
:on-submit-editing plain-message/send}) :on-content-size-change #(let [size (-> (.-nativeEvent %)
(.-contentSize)
(.-height))]
(set-layout-size-fn size))
:on-focus #(do (dispatch [:set :focused true])
(dispatch [:set-chat-ui-props :show-emoji? false]))
:on-blur #(do (dispatch [:set :focused false])
(set-layout-size-fn 0))
:blur-on-submit true
:multiline true
:editable (not disable?)})
(defn command-input-options [icon-width disable? sending-disabled?] (defn command-input-options [{:keys [icon-width disable? sending-disabled?]}]
{:style (st-response/command-input icon-width disable?) {:style (st-response/command-input icon-width disable?)
:on-change-text (when-not disable? command/set-input-message) :on-change-text (when-not disable? command/set-input-message)
:on-submit-editing (fn [] :on-submit-editing (fn []
(when-not sending-disabled? (when-not sending-disabled?
(dispatch [:send-command!])))}) (dispatch [:send-command!])))
:on-focus #(dispatch [:set :focused true])
:on-blur #(dispatch [:set :focused true])
:blur-on-submit false})
(defn get-options [{:keys [type placeholder]} command-type] (defn get-options [{:keys [type placeholder]} command-type]
(let [options (case (keyword type) (let [options (case (keyword type)
@ -63,22 +76,15 @@
[text-input [text-input
(merge (merge
(if command? (if command?
(command-input-options icon-width disable? sending-disabled?) (command-input-options {:icon-width icon-width
(plain-input-options (or disable? (not active?)))) :disable? disable?
:sendind-disabled? sending-disabled?})
(plain-input-options {:set-layout-size-fn set-layout-size
:disable? (or disable? (not active?))}))
{:placeholder-text-color :#c0c5c9 {:placeholder-text-color :#c0c5c9
:auto-focus (when command? :auto-focus (when command?
(not (:fullscreen command))) (not (:fullscreen command)))
:blur-on-submit false
:multiline true
:on-content-size-change #(let [size (-> (.-nativeEvent %)
(.-contentSize)
(.-height))]
(set-layout-size size))
:accessibility-label id/chat-message-input :accessibility-label id/chat-message-input
:on-focus #(do (dispatch [:set :focused true])
(dispatch [:set-chat-ui-props :show-emoji? false]))
:on-blur #(do (dispatch [:set :focused false])
(set-layout-size 0))
:default-value (if command? :default-value (if command?
(or input-command "") (or input-command "")
(or input-message ""))} (or input-message ""))}

View File

@ -414,6 +414,7 @@
(dispatch [:add-chat from chat])) (dispatch [:add-chat from chat]))
(when-not (:pending? existing-contact) (when-not (:pending? existing-contact)
(dispatch [:update-contact! contact]) (dispatch [:update-contact! contact])
(dispatch [:update-chat! chat])
(dispatch [:watch-contact contact])))))))) (dispatch [:watch-contact contact]))))))))
(register-handler ::post-error (register-handler ::post-error