Fix for Add to contacts request (#570)

This commit is contained in:
alwx 2016-12-21 17:55:48 +03:00
parent c9366c1d2b
commit 5547fd65ba
2 changed files with 13 additions and 18 deletions

View File

@ -456,11 +456,6 @@
(dispatch [::start-chat! contact-id options navigation-type])))))) (dispatch [::start-chat! contact-id options navigation-type]))))))
(register-handler :add-chat (register-handler :add-chat
(u/side-effect!
(fn [_ [_ chat-id chat]]
(dispatch [::add-chat chat-id chat]))))
(register-handler ::add-chat
(-> add-new-chat (-> add-new-chat
((enrich add-chat)) ((enrich add-chat))
((after save-new-chat!)))) ((after save-new-chat!))))

View File

@ -392,12 +392,12 @@
:status status :status status
:photo-path profile-image :photo-path profile-image
:name name} :name name}
contact-exist? (get contacts from) contact-exists? (get contacts from)
chat {:name name chat {:name name
:chat-id from :chat-id from
:contact-info (prn-str contact) :contact-info (prn-str contact)
:pending-contact? true}] :pending-contact? true}]
(if contact-exist? (if contact-exists?
(do (do
(dispatch [:update-contact! contact]) (dispatch [:update-contact! contact])
(dispatch [:watch-contact contact])) (dispatch [:watch-contact contact]))