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

Change: Make membership event type bold

Browse source 
Makes each type of event easier to find in long lists of membership
events.
This commit is contained in:
Adam Porter 2022-07-06 10:53:03 -05:00
parent 918d1d9d43
commit 2b4ee52e67
1 changed files with 7 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

11
ement-room.el
View file

@ -2941,9 +2941,10 @@ seconds."
'display '(space :width text :height (1))
'face thing)))
((pred ement-room-membership-events-p)
(insert (ement-room-wrap-prefix
(ement-room--format-membership-events thing ement-room)
'face 'ement-room-membership)))))
(let ((formatted-events (ement-room--format-membership-events thing ement-room)))
(add-face-text-property 0 (length formatted-events)
'ement-room-membership 'append formatted-events)
(insert (ement-room-wrap-prefix formatted-events))))))
;; (defun ement-room--format-event (event)
;; "Format `ement-event' EVENT."
@ -3644,7 +3645,9 @@ STRUCT should be an `ement-room-membership-events' struct."
events :key #'ement-event-sender))
for number = (length users)
when events
collect (format "%s %s (%s)" number type (string-join users ", ")))
collect (format "%s %s (%s)" number
(propertize type 'face 'bold)
(string-join users ", ")))
"; "))))))))
;;;;; Images