[#12731] Blank space in place of 1-1 chat with a blocked user on the home screen
Signed-off-by: andrey <motor4ik@gmail.com>
This commit is contained in:
parent
8f5d3df215
commit
cd30a04626
|
@ -39,6 +39,7 @@
|
|||
cofx
|
||||
{:db (-> db
|
||||
(update :chats dissoc public-key)
|
||||
(update :chats-home-list disj public-key)
|
||||
(assoc-in [:contacts/contacts public-key :added] false))}
|
||||
fxs)))
|
||||
|
||||
|
|
|
@ -861,7 +861,11 @@
|
|||
:<- [::chats]
|
||||
:<- [:chats-home-list]
|
||||
(fn [[chats active-chats]]
|
||||
(map #(get chats %) active-chats)))
|
||||
(reduce #(if-let [item (get chats %2)]
|
||||
(conj %1 item)
|
||||
%1)
|
||||
[]
|
||||
active-chats)))
|
||||
|
||||
(re-frame/reg-sub
|
||||
:chat-by-id
|
||||
|
|
Loading…
Reference in New Issue