new-guix-dotfiles/Sanderson.org~

166 lines
6.5 KiB
Org Mode

* Sanderson config
** Main system
#+begin_src scheme :tangle sanderson.scm
(use-modules (gnu)
(nongnu packages linux)
(nongnu system linux-initrd))
(use-service-modules cups desktop networking ssh syncthing xorg)
(operating-system
(kernel linux)
(initrd microcode-initrd)
(firmware (list linux-firmware))
(locale "en_US.utf8")
(timezone "America/Chicago")
(keyboard-layout (keyboard-layout "us"))
(host-name "sanderson")
;; The list of user accounts ('root' is implicit).
(users (cons* (user-account
(name "skylar")
(comment "Skylar")
(group "users")
(home-directory "/home/skylar")
(supplementary-groups '("wheel" "netdev" "audio" "video")))
%base-user-accounts))
;; Packages installed system-wide. Users can also install packages
;; under their own account: use 'guix search KEYWORD' to search
;; for packages and 'guix install PACKAGE' to install a package.
(packages (append (specifications->packages (list "nss-certs"
"stumpwm"))
%base-packages))
;; Below is the list of system services. To search for available
;; services, run 'guix system search KEYWORD' in a terminal.
(services
(append (list (service plasma-desktop-service-type)
;; To configure OpenSSH, pass an 'openssh-configuration'
;; record as a second argument to 'service' below.
(service openssh-service-type)
(service cups-service-type)
(set-xorg-configuration
(xorg-configuration (keyboard-layout keyboard-layout)))
(service syncthing-service-type
(syncthing-configuration
(user "skylar")
(home "/home/skylar"))))
;; This is the default list of services we
;; are appending to.
(modify-services %desktop-services
(guix-service-type config => (guix-configuration
(inherit config)
(substitute-urls
(append (list "https://substitutes.nonguix.org")
%default-substitute-urls))
(authorized-keys
(append (list (local-file "./signing-key.pub"))
%default-authorized-guix-keys)))))))
(bootloader (bootloader-configuration
(bootloader grub-bootloader)
(targets (list "/dev/sda"))
(keyboard-layout keyboard-layout)))
(swap-devices (list (swap-space
(target (uuid
"646006cb-84a4-46ea-a03c-78a343b2fd07")))))
;; The list of file systems that get "mounted". The unique
;; file system identifiers there ("UUIDs") can be obtained
;; by running 'blkid' in a terminal.
(file-systems (cons* (file-system
(mount-point "/")
(device (uuid
"38be76dc-b7d8-4433-bab6-04c6c7f62733"
'ext4))
(type "ext4")) %base-file-systems)))
#+end_src
** Home configuration
#+begin_src scheme :tangle home/sanderson.scm
(use-modules (gnu home)
(gnu home services)
(gnu packages)
(gnu packages emacs-xyz)
(gnu packages gnupg)
(gnu packages scheme)
(gnu packages text-editors)
(gnu services)
(guix build-system emacs)
(guix build-system font)
(guix download)
(guix gexp)
(guix packages)
(gnu home services shells)
(gnu home services gnupg))
(load "./emacs-packages.scm")
(home-environment
;; Below is the list of packages that will show up in your
;; Home profile, under ~/.guix-home/profile.
(packages (append
(specifications->packages
(list "bat"
"calibre"
"emacs"
"firefox"
"font-fira-code"
"font-google-noto"
"font-google-noto-emoji"
"gerbil"
"git"
"gnupg"
"gnutls"
"kitty"
"kmonad"
"kwallet"
"nheko"
"offlineimap3"
"okular"
"mu"
"pamixer"
"password-store"
"pavucontrol"
"python"
"rofi"
"rofi-pass"
"sbcl-stumpwm-pamixer"
"smtpmail"
"steam"
"stumpwm"
"swi-prolog"
"xclip"
"zoom"))
emacs-packages))
;; Below is the list of Home services. To search for available
;; services, run 'guix home search KEYWORD' in a terminal.
(services
(list (service home-bash-service-type
(home-bash-configuration
(aliases '(("grep" . "grep --color=auto")
("ip" . "ip -color=auto")
("ll" . "ls -l")
("ls" . "ls -p --color=auto")))
(bashrc (list (local-file
"/home/skylar/.config/guix/home/.bashrc"
"bashrc")))
(bash-profile (list (local-file
"/home/skylar/.config/guix/home/.bash_profile"
"bash_profile")))))
(service home-gpg-agent-service-type
(home-gpg-agent-configuration
(pinentry-program
(file-append pinentry "/bin/pinentry"))
(default-cache-ttl 86400)
(max-cache-ttl 86400)
(ssh-support? #t)))
(service home-files-service-type
`((".emacs.d/init.el" ,(local-file "init.el"))
(".offlineimaprc" ,(local-file "offlineimaprc")))))))
#+end_src