hiro/ement.el
1
0
Fork 0
mirror of https://github.com/vale981/ement.el synced 2025-03-05 09:21:37 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

Fix: (ement-room--format-membership-events) Typo

Browse source
This commit is contained in:
Adam Porter 2022-05-07 07:36:17 -05:00
parent 9f72b9bf2a
commit 078d9db4ef
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
ement-room.el
View file

@ -3639,7 +3639,7 @@ STRUCT should be an `ement-room-membership-events' struct."
(cl-find (ement-event-state-key event) join-events (cl-find (ement-event-state-key event) join-events
:test #'equal :key #'ement-event-state-key)) :test #'equal :key #'ement-event-state-key))
rejoin-events)) rejoin-events))
(format "Membership: %s" (format "Membership: %s."
(string-join (cl-loop for (type . events) (string-join (cl-loop for (type . events)
in (ement-alist "rejoined" rejoin-events in (ement-alist "rejoined" rejoin-events
"joined" join-events "joined" join-events
@ -3649,7 +3649,7 @@ STRUCT should be an `ement-room-membership-events' struct."
for users = (delete-dups (mapcar #'event-user events)) for users = (delete-dups (mapcar #'event-user events))
for number = (length users) for number = (length users)
when events when events
collect (format "%s %s (%s)." number type (string-join users ", "))) collect (format "%s %s (%s)" number type (string-join users ", ")))
"; ")))))))) "; "))))))))
;;;;; Images ;;;;; Images