sako/nixos
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(config) emacs: make ement.el better

Browse source
This commit is contained in:
Sakooooo 2024-10-21 17:50:02 +04:00
parent 0510b04886
commit 5545f098a6
Signed by: sako
GPG key ID: FE52FD65B76E4751
1 changed files with 35 additions and 19 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

54
config/emacs/emacs.org
View file

@ -1137,29 +1137,45 @@ Will configure later, (use elfeed protocol ok ty)
Ill set this up later as well Ill set this up later as well
#+begin_src emacs-lisp #+begin_src emacs-lisp
(use-package ement (use-package ement
:commands ement-connect :commands (ement-connect)
:custom :custom
(ement-notify-dbus-p nil) ;; Turn off notifications (ement-room-avatars t)
(ement-sessions-file "~/.cache/ement.el") (ement-room-images t)
(ement-room-list-default-keys (ement-room-compose-method 'compose-buffer)
'(;; Group all invitations (this group will appear first since the rooms are (ement-room-compose-buffer-window-auto-height-min 10)
;; already sorted first). (ement-save-sessions t)
((membership :status 'invite)) (ement-notify-dbus-p nil) ;; Turn off notifications
(ement-sessions-file "~/.cache/ement.el")
(ement-room-list-default-keys
'(;; Group all invitations (this group will appear first since the rooms are
;; already sorted first).
((membership :status 'invite))
;; Group all left rooms (this group will appear last, because the rooms are already ;; Group all left rooms (this group will appear last, because the rooms are already
;; sorted last). ;; sorted last).
((membership :status 'leave)) ((membership :status 'leave))
;; Group all favorite rooms, which are already sorted first. ;; Group all favorite rooms, which are already sorted first.
(favourite) (favourite)
;; Group all low-priority rooms, which are already sorted last. ;; Group all low-priority rooms, which are already sorted last.
(low-priority) (low-priority)
;; Group other rooms which are unread. ;; Group other rooms which are unread.
(unread) (unread)
(people) (people)
freshness))) freshness))
:config
(require 'ement-tabulated-room-list)
(add-to-list 'display-buffer-alist
(cons "^\\*Ement compose: "
(cons 'display-buffer-below-selected
'((window-height . 6)
(inhibit-same-window . t)
(reusable-frames . nil)))))
(add-to-list 'display-buffer-alist
'("\\*Ement image:" (display-buffer-reuse-window)
(reusable-frames . nil))))
#+end_src #+end_src
** Subsonic ** Subsonic
#+begin_src emacs-lisp #+begin_src emacs-lisp