Put in earplugs

This commit is contained in:
nik gaffney 2024-02-07 18:42:27 +01:00
parent 09d8efeb13
commit e45f9c850f
Signed by: nik
GPG key ID: 989F5E6EDB478160

View file

@ -1,13 +1,21 @@
;; -*- mode: scheme; coding: utf-8; -*- ;; -*- mode: scheme; coding: utf-8; -*-
;; ;;
;; tangled from home-configuration.org on 2024-02-07 18:22:13+01:00) ;; tangled from home-configuration.org on 2024-02-07 18:41:00+01:00)
(use-modules (gnu) (use-modules (gnu)
(gnu home) (gnu home)
(gnu packages) (gnu packages)
(gnu services)
(gnu packages gnupg) (gnu packages gnupg)
(gnu packages shells)
(guix channels)
(guix gexp) (guix gexp)
(gnu home services)
(gnu home services guix)
(gnu home services shells) (gnu home services shells)
(gnu home services dotfiles)
(gnu home services desktop)
(gnu home services sound)
(gnu home services gnupg)) (gnu home services gnupg))
(home-environment (home-environment
@ -49,71 +57,67 @@
))) )))
(services (services
(list (list
(simple-service 'variant-packages-service (simple-service 'variant-packages-service
home-channels-service-type home-channels-service-type
(list (list
(channel (channel
(name 'nonguix) (name 'nonguix)
(url "https://gitlab.com/nonguix/nonguix") (url "https://gitlab.com/nonguix/nonguix")
(branch "master") (branch "master")
(commit (commit
"fe2fcf125cfc5f7284b24cfac50f37feaf74f7b5") "fe2fcf125cfc5f7284b24cfac50f37feaf74f7b5")
(introduction (introduction
(make-channel-introduction (make-channel-introduction
"897c1a470da759236cc11798f4e0a5f7d4d59fbc" "897c1a470da759236cc11798f4e0a5f7d4d59fbc"
(openpgp-fingerprint (openpgp-fingerprint
"2A39 3FFF 68F4 EF7A 3D29 12AF 6F51 20A0 22FB B2D5")))) "2A39 3FFF 68F4 EF7A 3D29 12AF 6F51 20A0 22FB B2D5"))))
(channel (channel
(name 'zzkt) (name 'zzkt)
(url "https://gitlab.com/zzkt/guix") (url "https://gitlab.com/zzkt/guix")
(branch "endless") (branch "endless")
(commit (commit
"ef1868ed9bdcf1a49771442e405bd88207b3ab0c") "ef1868ed9bdcf1a49771442e405bd88207b3ab0c")
(introduction (introduction
(make-channel-introduction (make-channel-introduction
"fc0ada85de1980e1fc9ee50672d827c0c17c3e7d" "fc0ada85de1980e1fc9ee50672d827c0c17c3e7d"
(openpgp-fingerprint (openpgp-fingerprint
"24A7 4604 91E6 A60F 5BB4 A00F 989F 5E6E DB47 8160")))))) "24A7 4604 91E6 A60F 5BB4 A00F 989F 5E6E DB47 8160"))))))
(simple-service 'some-useful-env-vars-service (simple-service 'variant-env-vars-service
home-environment-variables-service-type home-environment-variables-service-type
`(("NOTMUCH_PROFILE" . "$HOME/.config/notmuch/notmuch.conf") `(("NOTMUCH_PROFILE" . "$HOME/.config/notmuch/notmuch.conf")
("LD_LIBRARY_PATH" . "$HOME/.guix-profile/lib") ("LD_LIBRARY_PATH" . "$HOME/.guix-profile/lib")
("SHELL" . ,(file-append zsh "/bin/zsh")))) ("SHELL" . ,(file-append zsh "/bin/zsh"))))
(service home-zsh-service-type (service home-zsh-service-type
(home-zsh-configuration (home-zsh-configuration
;; configs in $XDG_CONFIG_HOME/zsh ;; configs in $XDG_CONFIG_HOME/zsh
(xdg-flavor? #t) (xdg-flavor? #t)
(environment-variables (environment-variables
'(("HISTFILE" . "$HOME/.config/zsh/.history") '(("HISTFILE" . "$HOME/.config/zsh/.history")
("HISTSIZE" . "800000") ("HISTSIZE" . "800000")
("SAVEHIST" . "800000"))) ("SAVEHIST" . "800000")))
(zshenv (zshenv
(list (local-file ".zshenv" "zshenv"))) (list (local-file ".zshenv" "zshenv")))
(zshrc (zshrc
(list (local-file ".zshrc" "zshrc"))))) (list (local-file ".zshrc" "zshrc")))))
(service home-gpg-agent-service-type (service home-gpg-agent-service-type
(home-gpg-agent-configuration (home-gpg-agent-configuration
(pinentry-program (pinentry-program
(file-append pinentry-emacs "/bin/pinentry-emacs")) (file-append pinentry-emacs "/bin/pinentry-emacs"))
(ssh-support? #t))) (ssh-support? #t)))
(service home-dotfiles-service-type (service home-dotfiles-service-type
(home-dotfiles-configuration (home-dotfiles-configuration
(directories (list "dotfiles")))) (directories (list "dotfiles"))))
(service home-dbus-service-type)
(service home-pipewire-service-type
(home-pipewire-configuration
(enable-pulseaudio? #t)))
(service home-pipewire-service-type ))) ;; end home-environment
(home-pipewire-configuration
(pipewire "pipewire")
(wireplumber "wireplumber")
(enable-pulseaudio? #t)))
;; see -> https://guix.gnu.org/manual/devel/en/html_node/Fonts-Home-Services.html
))) ;; end home-environment