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

emacs/init.el: add elcord

Browse source
This commit is contained in:
Sakooooo 2024-12-08 11:29:50 +04:00
parent 8ed6bba664
commit eacd7d562f
Signed by: sako
GPG key ID: FE52FD65B76E4751
1 changed files with 27 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

27
config/emacs/init.el
View file

@ -437,4 +437,31 @@
(use-package org-pomodoro
:ensure t)
;; --- Social ---
;; elcord
(use-package elcord
:init
(setq elcord-display-buffer-details nil)
(setq elcord-use-major-mode-as-main-icon t)
(setq elcord-quiet t)
(setq elcord-display-elapsed nil)
:config
(defun elcord--disable-elcord-if-no-frames (f)
(ignore f)
(when (let ((frames (delete f (visible-frame-list))))
(or (null frames)
(elcord-mode -1)))))
(defun elcord--enable-on-frame-created (f)
(elcord-mode +1))
(add-hook 'after-make-frame-functions 'elcord--enable-on-frame-created)
(defun sakomacs/elcord-mode-hook ()
(if elcord-mode
(add-hook 'delete-frame-functions 'elcord--disable-elcord-if-no-frames)
(remove-hook 'delete-frame-functions 'elcord--disable-elcord-if-no-frames)))
(elcord-mode)
(add-hook 'elcord-mode-hook 'sakomacs/elcord-mode-hook))
;;; init.el ends here