Skip to content

Commit 2d79926

Browse files
committed
feat: group emojis and show a count
1 parent 44b66cc commit 2d79926

File tree

2 files changed

+8
-6
lines changed

2 files changed

+8
-6
lines changed

src/clojurians_log/db/queries.clj

Lines changed: 2 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -52,7 +52,8 @@
5252
[:message/text
5353
:message/ts
5454
:message/thread-ts
55-
{:reaction/_message [:reaction/type {:reaction/emoji [*]}]}
55+
{:reaction/_message [:reaction/user
56+
:reaction/type {:reaction/emoji [*]}]}
5657
{:message/user [:user/name
5758
:user/slack-id
5859
:user-profile/real-name

src/clojurians_log/views.clj

Lines changed: 6 additions & 5 deletions
Original file line numberDiff line numberDiff line change
@@ -198,11 +198,12 @@
198198
(cl.tu/format-inst-time inst)]]
199199
[:span.message_star]
200200
[:span.message_content [:p (slack-messages/message->hiccup text usernames emojis)]]
201-
"Reactions: "
202-
(for [reaction (:reaction/_message message)]
203-
[:span.emoji
204-
(slack-messages/text->emoji
205-
(get-in reaction [:reaction/emoji :emoji/shortcode]))])])))
201+
(let [reaction-group (group-by #(get-in % [:reaction/emoji :emoji/shortcode]) (:reaction/_message message))]
202+
(for [[emoji-shortcode reactions] reaction-group]
203+
[:div.message-reaction
204+
(slack-messages/text->emoji emoji-shortcode)
205+
" "
206+
(count reactions)]))])))
206207

207208
(defn- message-hiccup
208209
"Returns either a single message hiccup, or if the given message starts a thread,

0 commit comments

Comments
 (0)