From f486d2fa1e11631cd5de3a93f93bf730dc0c2998 Mon Sep 17 00:00:00 2001 From: Thanos Apollo Date: Sat, 26 Aug 2023 14:18:27 +0300 Subject: stumpwm: format init commands --- stumpwm.org | 9 +++------ 1 file changed, 3 insertions(+), 6 deletions(-) (limited to 'stumpwm.org') diff --git a/stumpwm.org b/stumpwm.org index 33407c1..949b77a 100644 --- a/stumpwm.org +++ b/stumpwm.org @@ -55,15 +55,12 @@ (cond ((equal (asdf:hostname) "zeus") (feh-set-wallpaper "eris-chocolates.jpg")) ((equal (asdf:hostname) "hermes") (feh-set-wallpaper "library-old-house.jpg")))) - (defun thanos/run-commands (input) - "Run a list of shell commands" - (mapc #'stumpwm:run-shell-command input)) - (when *initializing* - (thanos/run-commands + (mapc #'stumpwm:run-shell-command '("emacs --daemon" "picom" - "setxkbmap -layout us,gr,my-bg -option 'ctrl:swapcaps' -option 'grp:alt_space_toggle'")) + "setxkbmap -layout us,gr,my-bg -option 'ctrl:swapcaps' -option 'grp:alt_space_toggle'" + "transmission-daemon")) (thanos/set-wallpapers)) (setf *startup-message* "Welcome back, Thanos") -- cgit v1.2.3