pestctrl/emacs-config
1
0
Fork 0
mirror of https://github.com/pestctrl/emacs-config.git synced 2026-02-16 16:24:18 +00:00
Code Issues Projects Releases Packages Wiki Activity

EXWM isn't really a WM without at least these programs

Browse source
This commit is contained in:
Benson Chu 2022-11-07 16:26:47 -08:00
parent e3a09cbbc0
commit 2c56134d27
1 changed files with 14 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

19
lisp/exwm-aux/exwm-startup.el
View file

@ -24,20 +24,29 @@
;;; Code:
(defvar exwm-startup-programs
'(("megasync" "QT_SCALE_FACTOR=1 megasync")
"deadd-notification-center"
'(("megasync" "QT_SCALE_FACTOR=1 megasync")
"/usr/lib/kdeconnectd"
("compton" "compton -f -i .7 -b")
;; ("compton -f -i .7 -b --backend glx --blur-background --blur-method kawase --blur-strength 2")
"/usr/lib/polkit-gnome/polkit-gnome-authentication-agent-1"
"/usr/lib/notification-daemon-1.0/notification-daemon"
"nm-applet"
"start-pulseaudio-x11;pactl upload-sample /usr/share/sounds/gnome/default/alerts/drip.ogg beep; pactl load-module module-x11-bell sample=beep; xset b 100"
"kdeconnect-indicator"
"qtox"
))
(defvar exwm-computer-programs
'("dunst"
"nm-applet"
"/usr/lib/polkit-gnome/polkit-gnome-authentication-agent-1"
"/usr/lib/notification-daemon-1.0/notification-daemon"))
(defun start-minimum-programs ()
(dolist (program exwm-computer-programs)
(if (listp program)
(start-process-shell-command (car program) nil (cadr program))
(start-process-shell-command (file-name-nondirectory program) nil program))))
(defun call-startup-programs ()
(start-minimum-programs)
(when (y-or-n-p "Run startup programs? ")
(dolist (program exwm-startup-programs)
(if (listp program)