ryuslash/dotfiles
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

pop-os: Set up stumpwm

Browse source
This commit is contained in:
Tom Willemse 2025-01-27 16:32:30 -08:00
parent 6241cc0e5d
commit 96eaffe885
1 changed files with 27 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

29
oni/home/config/pop-os.scm
View file

@ -25,6 +25,13 @@
home-emacs-org-journal-service-type)) home-emacs-org-journal-service-type))
#:use-module ((oni home services environment) #:use-module ((oni home services environment)
#:select (home-environment-service)) #: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 home services zsh)
#:use-module ((oni packages emacs) #:use-module ((oni packages emacs)
#:select (emacs-php-ts-mode)) #:select (emacs-php-ts-mode))
@ -55,7 +62,9 @@
emacs-oni-tramp emacs-oni-tramp
emacs-oni-web-mode emacs-oni-web-mode
emacs-oni-yaml emacs-oni-yaml
emacs-oni-lua))) emacs-oni-lua))
#:use-module ((oni packages stumpwm)
#:select (stumpwm+swank)))
(home-environment (home-environment
(packages (list (specification->package+output "glibc-locales") (packages (list (specification->package+output "glibc-locales")
@ -118,4 +127,20 @@
;; configuration last. ;; configuration last.
(service home-zsh-syntax-highlighting-service-type) (service home-zsh-syntax-highlighting-service-type)
(service home-zsh-autosuggestions-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"))))))))