;; This is a sample Guix Home configuration which can help setup your ;; home directory in the same declarative manner as Guix System. ;; For more information, see the Home Configuration section of the manual. (define-module (guix-home-config) #:use-module (gnu home) #:use-module (gnu home services) #:use-module (gnu home services shells) #:use-module (gnu services) #:use-module (gnu packages) #:use-module (gnu packages admin) #:use-module (gnu packages emacs) #:use-module (gnu packages fonts) #:use-module (gnu packages mail) #:use-module (gnu packages rust-apps) #:use-module (gnu packages search) #:use-module (gnu packages imagemagick) #:use-module (gnu packages password-utils) #:use-module (gnu packages image-viewers) #:use-module (gnu packages xfce) #:use-module (gnu packages sync) #:use-module (gnu packages xorg) #:use-module (gnu packages xdisorg) #:use-module (gnu packages gnome) #:use-module (gnu packages librewolf) #:use-module (gnu packages emacs-xyz) #:use-module (gnu packages text-editors) #:use-module (gnu packages golang) #:use-module (gnu packages gnupg) #:use-module (gnu packages aspell) #:use-module (gnu packages sqlite) #:use-module (gnu packages gcc) #:use-module (gnu packages commencement) #:use-module (gnu packages freedesktop) #:use-module (gnu packages base) #:use-module (gnu packages golang-crypto) #:use-module (gnu packages linux) #:use-module (gnu packages image) #:use-module (gnu packages xdisorg) #:use-module (gnu packages databases) #:use-module (gnu packages package-management) #:use-module (gnu packages compression) #:use-module (gnu system shadow) #:use-module (gnu services xorg) #:use-module (gnu system keyboard) #:use-module (gnu home services fontutils) #:use-module (gnu home services dotfiles) #:use-module (gnu home services gnupg) #:use-module (gnu home services desktop) #:use-module (gnu home services fontutils) #:use-module (gnu packages ssh) #:use-module (gnu packages pdf) #:use-module (gnu packages texinfo) #:use-module (gnu packages man) #:use-module (gnu packages llvm) #:use-module (gnu packages cmake) #:use-module (guix gexp) #:use-module (guix packages) #:use-module (guix download) #:use-module (gnu packages video) #:use-module (gnu packages mp3) #:use-module (guix build-system go) #:use-module (gnu home services pm) #:use-module (gnu home services xdg) #:use-module (nongnu packages game-client) #:use-module (nongnu packages mozilla)) (define home-config (home-environment (packages (list font-iosevka font-iosevka-aile font-iosevka-etoile font-liberation isync zoxide ugrep imagemagick password-store fd recutils unzip inxi alsa-utils texinfo man-db man-pages mandoc mp3info steam ;; gsettings (specification->package+output "glib:bin") go binutils sqlite gcc-toolchain clang-toolchain cmake mg imv thunar thunar-volman emacs-geiser emacs-geiser-guile emacs-pinentry emacs-pdf-tools emacs-alsamixer-el mu msmtp emacs aspell aspell-dict-en adwaita-icon-theme gnupg age pinentry openssh firefox librewolf xkbutils xsetroot xkbset xhost scrot imlib2 ;; Needed for scrot xset xrdb brightnessctl autocutsel gsettings-desktop-schemas setxkbmap)) (services (list (service home-bash-service-type (home-bash-configuration (guix-defaults? #f) (bash-profile (list (local-file "./profile"))) (bashrc (list (local-file "./bashrc"))))) (service home-startx-command-service-type (xorg-configuration (keyboard-layout (keyboard-layout "us" "colemak" #:options '("ctrl:nocaps"))))) (simple-service 'additional-fonts-service home-fontconfig-service-type (list "~/.local/extra/fonts")) (service home-gpg-agent-service-type (home-gpg-agent-configuration (pinentry-program (file-append pinentry-emacs "/bin/pinentry-emacs")) (ssh-support? #t) (max-cache-ttl 99999) (default-cache-ttl 99999))) (service home-xdg-user-directories-service-type (home-xdg-user-directories-configuration (desktop "$HOME/desktop") (documents "$HOME/docs") (download "$HOME/download") (music "$HOME/music") (pictures "$HOME/pictures") (publicshare "$HOME/public") (templates "$HOME/templates") (videos "$HOME/videos"))) (service home-xdg-mime-applications-service-type (home-xdg-mime-applications-configuration (default '(("application/mp4" . "mpv.desktop") ("application/x-shellscript" . "emacsclient.desktop") ("text/javascript" . "emacsclient.desktop") ("text/markdown" . "emacsclient.desktop") ("text/plain" . "emacsclient.desktop") ("text/x-python3" . "emacsclient.desktop") ("video/h264" . "mpv.desktop") ("video/h265" . "mpv.desktop") ("video/h266" . "mpv.desktop") ("video/mpeg" . "mpv.desktop") ("x-scheme-handler/mailto" . "emacs-mail.desktop") ("x-www-browser" . "librewolf.desktop") ("text/html" . "librewolf.desktop") ("x-scheme-handler/about" . "librewolf.desktop") ("x-scheme-handler/chrome" . "librewolf.desktop") ("x-scheme-handler/file" . "emacsclient.desktop") ("x-scheme-handler/http" . "librewolf.desktop") ("x-scheme-handler/https" . "librewolf.desktop") ("x-scheme-handler/unknown" . "librewolf.desktop"))))) (service home-files-service-type `((".guile" ,%default-dotguile) (".Xdefaults" ,%default-xdefaults))) (service home-dotfiles-service-type (home-dotfiles-configuration (directories '("./dots")))) (service home-dbus-service-type) (simple-service 'extend-home home-environment-variables-service-type `(("PATH" . "${PATH}:~/go/bin:~/.cargo/bin:~/.local/bin"))) (service home-xdg-configuration-files-service-type `(("gdb/gdbinit" ,%default-gdbinit))))))) home-config