This commit is contained in:
Daniel Ziltener 2023-11-28 23:52:59 +01:00
parent d388221901
commit 37583edcba
Signed by: zilti
GPG key ID: B38976E82C9DAE42
2 changed files with 91 additions and 81 deletions

View file

@ -5,89 +5,99 @@
;; need to capture the channels being used, as returned by "guix describe". ;; need to capture the channels being used, as returned by "guix describe".
;; See the "Replicating Guix" section in the manual. ;; See the "Replicating Guix" section in the manual.
(use-modules (gnu home) (use-modules
(gnu packages) (gnu home)
(gnu services) (gnu packages)
(guix gexp) (gnu packages gnupg)
(gnu home services gnupg) (gnu services)
(gnu home services mcron) (guix gexp)
(gnu home services pm) (gnu home services gnupg)
(gnu home services shells) (gnu home services mcron)
(gnu home services shepherd) (gnu home services pm)
(gnu home services ssh)) (gnu home services shells)
(gnu home services shepherd)
(gnu home services ssh))
(home-environment (home-environment
;; Below is the list of packages that will show up in your ;; Below is the list of packages that will show up in your
;; Home profile, under ~/.guix-home/profile. ;; Home profile, under ~/.guix-home/profile.
(packages (packages
(specifications->packages (specifications->packages
(list pinentry-qt))) (list pinentry-qt)))
;; Below is the list of Home services. To search for available
;; Below is the list of Home services. To search for available ;; services, run 'guix home search KEYWORD' in a terminal.
;; services, run 'guix home search KEYWORD' in a terminal. (services
(services (list
(list (service home-msmtp-service-type
(service home-msmtp-service-type (home-msmtp-configuration
(home-msmtp-configuration (accounts
(accounts (list
(list (msmtp-account
(msmtp-account (name "LMail")
(name "LMail") (configuration
(configuration (msmtp-configuration
(msmtp-configuration (host "lyrion.ch")
(host "lyrion.ch") (port 587)
(port 587) (user "dziltener")
(user "dziltener") (password-eval "pass Privat/Mailaccount | head -n 1"))))
(password-eval "pass Privat/Mailaccount | head -n 1")))) (msmtp-account
(msmtp-account (name "Red Sky")
(name "Red Sky") (configuration
(configuration (msmtp-configuration
(msmtp-configuration (host "gmail.com")
(host "gmail.com") (port 587)
(port 587) (user "dz@redsky.io")
(user "dz@redsky.io") (password-eval "pass Privat/RedSkyGMail"))))))))
(password-eval "pass Privat/RedSkyGMail")))))))) (simple-service 'ziltis-environment-variable-service
(simple-service 'ziltis-environment-variable-service home-enviornment-variables-service-type
home-enviornment-variables-service-type `(("PASSWORD_STORE_DIR" . "$XDG_DATA_HOME/password-store")
`(("PASSWORD_STORE_DIR" . "$XDG_DATA_HOME/password-store") ("SSH_ASKPASS" . "ksshaskpass")))
("SSH_ASKPASS" . "ksshaskpass"))) (service home-bash-service-type
(service home-bash-service-type (home-bash-configuration
(home-bash-configuration (aliases
(aliases '(("hh" . "hstr") ("l" . "ls -alh") '(("hh" . "hstr")
("ll" . "ls -l") ("l" . "ls -alh")
("ls" . "ls --color=tty"))) ("ll" . "ls -l")
(bashrc (list (local-file ("ls" . "ls --color=tty")))
"/home/zilti/projects/guixconfig//.bashrc" (bashrc
"bashrc"))) (list
(bash-profile (list (local-file (local-file
"/home/zilti/projects/guixconfig//.bash_profile" "/home/zilti/projects/guixconfig//.bashrc"
"bash_profile"))))) "bashrc")))
(service home-dicod-service-type) (bash-profile
(service home-batsignal-service-type) (list
(service home-shepherd-service-type) (local-file
(service home-mcron-service-type "/home/zilti/projects/guixconfig//.bash_profile"
(home-mcron-configuration "bash_profile")))))
(jobs '()))) (service home-dicod-service-type)
(simple-service 'ziltis-channels (service home-batsignal-service-type)
home-channels-service-type (service home-shepherd-service-type)
(list (service home-mcron-service-type
(channel (home-mcron-configuration
(name 'ziltis-channel) (jobs
(url "https://gitea.lyrion.ch/zilti/guixchannel.git")))) '())))
(service home-openssh-service-type (simple-service 'ziltis-channels
(home-openssh-configuration home-channels-service-type
(hosts (list
(list (openssh-host (name "gitea.lyrion.ch") (channel
(host-name "gitea.lyrion.ch") (name 'ziltis-channel)
(user "git") (url "https://gitea.lyrion.ch/zilti/guixchannel.git"))))
(port 7920)))))) (service home-openssh-service-type
(service home-gpg-agent-service-type (home-openssh-configuration
(home-gpg-agent-configuration (hosts
(pinentry-program (list
(file-append pinentry-qt "/bin/pinentry-qt")) (openssh-host
(ssh-support? #t) (name "gitea.lyrion.ch")
(default-cache-ttl 7200) (host-name "gitea.lyrion.ch")
(default-cache-ttl-ssh 7200) (user "git")
(extra-content "allow-emacs-pinentry\nallow-loopback-pinentry"))) (port 7920))))))
(service home-dbus-service-type) (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 "allow-emacs-pinentry\nallow-loopback-pinentry")))
(service home-dbus-service-type)
)))

View file