fix :chat-properties
This commit is contained in:
parent
9e49529d12
commit
4c4e27267a
|
@ -159,10 +159,10 @@
|
|||
(fn [db _] (reaction @db)))
|
||||
|
||||
(register-sub :chat-properties
|
||||
(fn [{:keys [current-chat-id] :as db} [_ properties]]
|
||||
(fn [db [_ properties]]
|
||||
(->> properties
|
||||
(map (fn [k]
|
||||
[k (-> @db
|
||||
(get-in [:cgats current-chat-id k])
|
||||
(get-in [:chats (:current-chat-id @db) k])
|
||||
(reaction))]))
|
||||
(into {}))))
|
||||
|
|
Loading…
Reference in New Issue