status-im
/
status-react
mirror of https://github.com/status-im/status-react.git
2
0
Fork 0
Code Issues Projects Releases Wiki Activity

fix #144 add-new-contact 

Former-commit-id: 8a39ac2718
This commit is contained in:
Roman Volosovskyi 2016-08-26 12:16:20 +03:00
parent 1321a85659
commit dacc9a5446
2 changed files with 12 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
src/status_im/contacts/handlers.cljs
View File

@ -122,9 +122,15 @@
(assoc :new-contact-identity ""))) (assoc :new-contact-identity "")))
(register-handler :add-new-contact (register-handler :add-new-contact
(-> add-new-contact (u/side-effect!
((after save-contact)) (fn [_ [_ {:keys [whisper-identity] :as contact}]]
((after watch-contact)))) (when-not (contacts/get-contact whisper-identity)
(dispatch [::new-contact contact])))))
(register-handler ::new-contact
(-> add-new-contact
((after save-contact))
((after watch-contact))))
(defn set-contact-identity-from-qr (defn set-contact-identity-from-qr
[db [_ _ contact-identity]] [db [_ _ contact-identity]]

3
src/status_im/models/contacts.cljs
View File

@ -9,6 +9,9 @@
(r/sorted :name :asc) (r/sorted :name :asc)
r/collection->map)) r/collection->map))
(defn get-contact [id]
(r/get-one-by-field :account :contact :whisper-identity id))
(defn create-contact [{:keys [whisper-identity] :as contact}] (defn create-contact [{:keys [whisper-identity] :as contact}]
(let [contact-from-db (r/get-one-by-field :account :contact (let [contact-from-db (r/get-one-by-field :account :contact
:whisper-identity whisper-identity)] :whisper-identity whisper-identity)]