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

Add/Change: (ement-taxy-define-key space-p)

Browse source 
Group spaces separately, for clarity.  The UI isn't ideal yet, but
it's an improvement.
This commit is contained in:
Adam Porter 2022-04-28 15:59:02 -05:00
parent 255ffbf052
commit 65ead54698
1 changed files with 9 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
ement-taxy.el
View file

@ -134,6 +134,13 @@
(string-join (mapcar #'format-space parents) ", "))))))
(propertize key 'face 'ement-room-list-space)))))
(ement-taxy-define-key space-p ()
"Groups rooms that are themselves spaces."
(pcase-let* ((`[,room ,_session] item)
((cl-struct ement-room type) room))
(when (equal "m.space" type)
"Spaces")))
(ement-taxy-define-key name (&key name regexp)
(pcase-let* ((`[,room ,_session] item)
(display-name (ement-room--room-display-name room)))
@ -205,7 +212,8 @@
"Low-priority")))
(defcustom ement-taxy-default-keys
'(((membership :status 'invite))
'((space-p space)
((membership :status 'invite))
(favourite)
((membership :status 'leave))
(low-priority)