diff options
| author | 2025-01-27 16:32:30 -0800 | |
|---|---|---|
| committer | 2025-01-27 16:32:30 -0800 | |
| commit | 96eaffe8853132609d07bd7d9266d761c12a994e (patch) | |
| tree | aa21a6f448bdb4041ed0d3b89c10cc3354561821 | |
| parent | 6241cc0e5de150af5c76a551da8904bc245672b5 (diff) | |
| download | new-dotfiles-96eaffe8853132609d07bd7d9266d761c12a994e.tar.gz new-dotfiles-96eaffe8853132609d07bd7d9266d761c12a994e.zip | |
pop-os: Set up stumpwm
| -rw-r--r-- | oni/home/config/pop-os.scm | 29 |
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")))))))) |
