mirror of
https://github.com/status-im/status-mobile.git
synced 2025-02-10 23:56:48 +00:00
9345f77dd8
fixed android styles group chat contacts management refactored contact group contacts, deletion, implemented group chat settings reworked contacts screens, implemented “add contacts” screen and “edit contacts” screen group chat ui refresh
33 lines
713 B
Clojure
33 lines
713 B
Clojure
(ns status-im.data-store.contact-groups
|
|
(:require [status-im.data-store.realm.contact-groups :as data-store])
|
|
(:refer-clojure :exclude [exists?]))
|
|
|
|
(defn- normalize-contacts
|
|
[item]
|
|
(update item :contacts vals))
|
|
|
|
(defn get-all
|
|
[]
|
|
(map normalize-contacts (data-store/get-all-as-list)))
|
|
|
|
(defn save
|
|
[{:keys [group-id] :as group}]
|
|
(data-store/save group (data-store/exists? group-id)))
|
|
|
|
(defn save-all
|
|
[groups]
|
|
(mapv save groups))
|
|
|
|
(defn save-property
|
|
[group-id property-name value]
|
|
(data-store/save-property group-id property-name value))
|
|
|
|
(defn delete
|
|
[group-id]
|
|
(data-store/delete group-id))
|
|
|
|
(defn add-contacts
|
|
[group-id identities]
|
|
(data-store/add-contacts group-id identities))
|
|
|