aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorGravatar Tom Willemse2025-01-27 16:32:30 -0800
committerGravatar Tom Willemse2025-01-27 16:32:30 -0800
commit96eaffe8853132609d07bd7d9266d761c12a994e (patch)
treeaa21a6f448bdb4041ed0d3b89c10cc3354561821
parent6241cc0e5de150af5c76a551da8904bc245672b5 (diff)
downloadnew-dotfiles-96eaffe8853132609d07bd7d9266d761c12a994e.tar.gz
new-dotfiles-96eaffe8853132609d07bd7d9266d761c12a994e.zip
pop-os: Set up stumpwm
-rw-r--r--oni/home/config/pop-os.scm29
1 files changed, 27 insertions, 2 deletions
diff --git a/oni/home/config/pop-os.scm b/oni/home/config/pop-os.scm
index 753e6a8..85a7877 100644
--- a/oni/home/config/pop-os.scm
+++ b/oni/home/config/pop-os.scm
@@ -25,6 +25,13 @@
home-emacs-org-journal-service-type))
#:use-module ((oni home services environment)
#:select (home-environment-service))
+ #:use-module ((oni home services stumpwm)
+ #:select (home-stumpwm-service-type
+ home-stumpwm-configuration
+ home-stumpwm-gaps-service-type
+ home-stumpwm-gaps-configuration
+ home-stumpwm-stumptray-service-type
+ home-stumpwm-stumptray-configuration))
#:use-module (oni home services zsh)
#:use-module ((oni packages emacs)
#:select (emacs-php-ts-mode))
@@ -55,7 +62,9 @@
emacs-oni-tramp
emacs-oni-web-mode
emacs-oni-yaml
- emacs-oni-lua)))
+ emacs-oni-lua))
+ #:use-module ((oni packages stumpwm)
+ #:select (stumpwm+swank)))
(home-environment
(packages (list (specification->package+output "glibc-locales")
@@ -118,4 +127,20 @@
;; configuration last.
(service home-zsh-syntax-highlighting-service-type)
(service home-zsh-autosuggestions-service-type)
- (service home-zsh-contextual-abbrevs-service-type))))
+ (service home-zsh-contextual-abbrevs-service-type)
+
+ (service home-stumpwm-service-type
+ (home-stumpwm-configuration
+ (package stumpwm+swank)
+ (configurations
+ (list (local-file "../services/stumpwm/config")))))
+ (service home-stumpwm-gaps-service-type
+ (home-stumpwm-gaps-configuration
+ (configurations
+ (list (local-file "../services/stumpwm/config-gaps")))))
+ (service home-stumpwm-stumptray-service-type
+ (home-stumpwm-stumptray-configuration
+ (configurations
+ (list (mixed-text-file "config-stumptray"
+ "(require 'stumptray)\n"
+ "(stumptray::stumptray)\n"))))))))