File tree Expand file tree Collapse file tree 2 files changed +8
-6
lines changed Expand file tree Collapse file tree 2 files changed +8
-6
lines changed Original file line number Diff line number Diff line change 52
52
[:message/text
53
53
:message/ts
54
54
:message/thread-ts
55
- {:reaction/_message [:reaction/type {:reaction/emoji [*]}]}
55
+ {:reaction/_message [:reaction/user
56
+ :reaction/type {:reaction/emoji [*]}]}
56
57
{:message/user [:user/name
57
58
:user/slack-id
58
59
:user-profile/real-name
Original file line number Diff line number Diff line change 198
198
(cl.tu/format-inst-time inst)]]
199
199
[:span.message_star ]
200
200
[: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)]))])))
206
207
207
208
(defn- message-hiccup
208
209
" Returns either a single message hiccup, or if the given message starts a thread,
You can’t perform that action at this time.
0 commit comments