From efd2cb4b79c8caebf1004f8a6f0794dfaaf47140 Mon Sep 17 00:00:00 2001 From: Flavio Fraschetti Date: Thu, 9 Nov 2023 16:46:44 +0000 Subject: [PATCH] hide channel list in token-gated communities --- src/status_im2/subs/communities.cljs | 11 +++++++---- 1 file changed, 7 insertions(+), 4 deletions(-) diff --git a/src/status_im2/subs/communities.cljs b/src/status_im2/subs/communities.cljs index f0917b135e..dc9823ff4c 100644 --- a/src/status_im2/subs/communities.cljs +++ b/src/status_im2/subs/communities.cljs @@ -243,8 +243,10 @@ (fn [[_ community-id]] [(re-frame/subscribe [:communities/community community-id]) (re-frame/subscribe [:chats/chats]) - (re-frame/subscribe [:communities/collapsed-categories-for-community community-id])]) - (fn [[{:keys [joined categories chats]} full-chats-data collapsed-categories] [_ community-id]] + (re-frame/subscribe [:communities/collapsed-categories-for-community community-id]) + (re-frame/subscribe [:communities/community community-id])]) + (fn [[{:keys [joined categories chats]} full-chats-data collapsed-categories + {:keys [token-permissions]}] [_ community-id]] (let [reduce-fn (reduce-over-categories community-id joined @@ -260,8 +262,9 @@ (sort-by (comp :position second)) (map (fn [[k v]] [k (update v :chats #(sort-by :position %))])))] - - categories-and-chats))) + (when (or (and token-permissions joined) + (not token-permissions)) + categories-and-chats)))) (re-frame/reg-sub :communities/collapsed-categories-for-community