211 lines
8.8 KiB
Scheme
211 lines
8.8 KiB
Scheme
;; -*- mode: guix-scheme -*-
|
|
;; This "home-environment" file can be passed to 'guix home reconfigure'
|
|
;; to reproduce the content of your profile. This is "symbolic": it only
|
|
;; specifies package names. To reproduce the exact same profile, you also
|
|
;; need to capture the channels being used, as returned by "guix describe".
|
|
;; See the "Replicating Guix" section in the manual.
|
|
|
|
(use-modules
|
|
(gnu packages)
|
|
(gnu packages gnupg)
|
|
(gnu services)
|
|
(guix gexp)
|
|
(guix channels)
|
|
(gnu home)
|
|
(gnu home services)
|
|
(gnu home services desktop)
|
|
(gnu home services gnupg)
|
|
(gnu home services guix)
|
|
(gnu home services mail)
|
|
(gnu home services mcron)
|
|
(gnu home services pm)
|
|
(gnu home services shells)
|
|
(gnu home services shepherd)
|
|
(gnu home services ssh))
|
|
|
|
(home-environment
|
|
;; Below is the list of Home services. To search for available
|
|
;; services, run 'guix home search KEYWORD' in a terminal.
|
|
(services
|
|
(list
|
|
(service home-shepherd-service-type)
|
|
(service home-msmtp-service-type
|
|
(home-msmtp-configuration
|
|
(default-account "LMail")
|
|
(accounts
|
|
(list
|
|
(msmtp-account
|
|
(name "LMail")
|
|
(configuration
|
|
(msmtp-configuration
|
|
(host "lyrion.ch")
|
|
(port 465)
|
|
(auth? #t)
|
|
(tls? #t)
|
|
(tls-starttls? #f)
|
|
(user "dziltener")
|
|
(from "dziltener@lyrion.ch")
|
|
(password-eval "pass Privat/Mailaccount | head -n 1"))))
|
|
(msmtp-account
|
|
(name "Red Sky")
|
|
(configuration
|
|
(msmtp-configuration
|
|
(host "gmail.com")
|
|
(port 587)
|
|
(auth? #t)
|
|
(tls? #t)
|
|
(tls-starttls? #f)
|
|
(user "dz@redsky.io")
|
|
(from "dziltener@lyrion.ch")
|
|
(password-eval "pass Privat/RedSkyGMail"))))))))
|
|
(simple-service 'ziltis-environment-variable-service
|
|
home-environment-variables-service-type
|
|
`(("PATH" . "$PATH:~/.local/bin")
|
|
("PASSWORD_STORE_DIR" . "$XDG_DATA_HOME/password-store")
|
|
("XDG_DATA_DIRS" . "$XDG_DATA_DIRS:$XDG_DATA_HOME/flatpak/exports/share")
|
|
("SSH_ASKPASS" . "ksshaskpass")
|
|
("ELM_DISPLAY" . "wl")
|
|
("SDL_VIDEODRIVER" . "wayland")
|
|
("MOZ_ENABLE_WAYLAND" . "1")
|
|
("SSL_CERT_FILE" . "$HOME/.guix-profile/etc/ssl/certs/ca-certificates.crt")
|
|
("CHICKEN_DOC_REPOSITORY" . "$XDG_DATA_HOME/chicken/doc")
|
|
;; ("CHICKEN_INSTALL_REPOSITORY" . "$XDG_DATA_HOME/chicken/eggs")
|
|
;; ("CHICKEN_REPOSITORY_PATH" . "$HOME/.guix-home/profile/var/lib/chicken/11/:$XDG_DATA_HOME/chicken/eggs")
|
|
;; ("CHICKEN_INSTALL_PREFIX" . "$HOME/.local")
|
|
))
|
|
(simple-service 'ziltis-home-files-service
|
|
home-files-service-type
|
|
`(#;(".gnupg/gpg-agent.conf" ,(local-file "gnupg/gpg-agent.conf"))))
|
|
(simple-service 'ziltis-xdg-configuration-files-service
|
|
home-xdg-configuration-files-service-type
|
|
`(("sway/config" ,(local-file "./sway/sway"))
|
|
("waybar/config" ,(local-file "./waybar/config"))
|
|
("waybar/style.css" ,(local-file "./waybar/style.css"))
|
|
("fuzzel/fuzzel.ini" ,(local-file "./fuzzel/fuzzel.ini"))
|
|
("git/config" ,(local-file "./git/config"))
|
|
("emacs/init.el" ,(local-file "./emacs/init.el"))
|
|
("emacs/early-init.el" ,(local-file "./emacs/early-init.el"))
|
|
("emacs/init.org" ,(local-file "./emacs/init.org"))
|
|
("emacs/templates" ,(local-file "./emacs/templates"))
|
|
("kitty/kitty.conf" ,(local-file "./kitty/kitty.conf"))
|
|
("senpai/senpai.scfg" ,(local-file "./senpai/senpai.scfg"))))
|
|
(service home-bash-service-type
|
|
(home-bash-configuration
|
|
(aliases
|
|
'(("hh" . "hstr")
|
|
("l" . "ls -alh")
|
|
("ll" . "ls -l")
|
|
("ls" . "ls --color=tty")
|
|
("create-guix-patch" . "git format-patch --minimal --to guix-patches@gnu.org --cc dziltener@lyrion.ch --inline --no-attach master; ls *.patch | xargs sed -i '1d'")
|
|
("send-guix-patch-series" . "for FILE in $(ls *.patch); do cat $FILE | msmtp -t; done")))
|
|
(bashrc
|
|
(list
|
|
(local-file
|
|
"./.bashrc"
|
|
"bashrc")))))
|
|
(service home-batsignal-service-type
|
|
(home-batsignal-configuration
|
|
(ignore-missing? #t)))
|
|
(service home-mcron-service-type
|
|
(home-mcron-configuration
|
|
(jobs
|
|
'())))
|
|
(simple-service 'ziltis-channels
|
|
home-channels-service-type
|
|
(list
|
|
(channel
|
|
(name 'ziltis-channel)
|
|
(url "https://gitea.lyrion.ch/zilti/guixchannel"))
|
|
(channel
|
|
(name 'nongnu-guix)
|
|
(url "https://gitlab.com/nonguix/nonguix"))))
|
|
(simple-service 'ziltis-packages
|
|
home-profile-service-type
|
|
(specifications->packages
|
|
(list "bsd-games"
|
|
"bolt"
|
|
"browserpass-native"
|
|
"chicken"
|
|
"chicken-apropos"
|
|
"chicken-chicken-doc"
|
|
"chicken-srfi-18"
|
|
"curl"
|
|
"direnv"
|
|
"emacs-pgtk-xwidgets"
|
|
"entr"
|
|
"eternalterminal"
|
|
"diff-so-fancy"
|
|
"firefox"
|
|
"flatpak"
|
|
"font-libertinus"
|
|
"font-nerdfont-monaspice"
|
|
"fuzzel"
|
|
"fzf"
|
|
"gammastep"
|
|
"grim"
|
|
"guile"
|
|
"glibc-locales"
|
|
"hstr"
|
|
"icecat"
|
|
"icedove-wayland"
|
|
"kitty"
|
|
"ksshaskpass"
|
|
"make"
|
|
"nm-tray"
|
|
"nnn"
|
|
#;"nss-certs" ; This package is broken
|
|
"openssh"
|
|
"password-store"
|
|
"pass-otp"
|
|
"passff-icecat"
|
|
"pavucontrol"
|
|
"pinentry-qt"
|
|
"pipewire"
|
|
"pv"
|
|
"rsync"
|
|
"rust"
|
|
"rust-cargo"
|
|
"senpai"
|
|
"sideload"
|
|
"slurp"
|
|
;; "sponge" https://linux.die.net/man/1/sponge
|
|
"swappy"
|
|
"swayfx"
|
|
"swayidle"
|
|
"swaylock-effects"
|
|
"tig"
|
|
"unzip"
|
|
"visidata"
|
|
"waybar"
|
|
"wlogout"
|
|
"xdg-desktop-portal")))
|
|
(service home-openssh-service-type
|
|
(home-openssh-configuration
|
|
(hosts
|
|
(list
|
|
(openssh-host
|
|
(name "github.com")
|
|
(host-name "github.com")
|
|
(user "git")
|
|
(identity-file "~/.ssh/personal_ed"))
|
|
(openssh-host
|
|
(name "www.opencode.net")
|
|
(host-name "www.opencode.net")
|
|
(user "git")
|
|
(identity-file "~/.ssh/personal_ed"))
|
|
(openssh-host
|
|
(name "gitea.lyrion.ch")
|
|
(host-name "gitea.lyrion.ch")
|
|
(user "git")
|
|
(port 7920)
|
|
(identity-file "~/.ssh/personal_ed"))))))
|
|
(service home-gpg-agent-service-type
|
|
(home-gpg-agent-configuration
|
|
(pinentry-program
|
|
(file-append pinentry-qt "/bin/pinentry-qt"))
|
|
(ssh-support? #t)
|
|
(default-cache-ttl 7200)
|
|
(default-cache-ttl-ssh 7200)
|
|
(extra-content "grab\nallow-emacs-pinentry\nallow-loopback-pinentry")))
|
|
(service home-dbus-service-type)
|
|
)))
|