diff options
Diffstat (limited to '.config/guix-builds/system-config.scm')
| -rw-r--r-- | .config/guix-builds/system-config.scm | 137 |
1 files changed, 69 insertions, 68 deletions
diff --git a/.config/guix-builds/system-config.scm b/.config/guix-builds/system-config.scm index 7cd59fd..68ec53d 100644 --- a/.config/guix-builds/system-config.scm +++ b/.config/guix-builds/system-config.scm @@ -4,82 +4,83 @@ ;; Indicate which modules to import to access the variables ;; used in this configuration. (use-modules (gnu) - (host-instance)) + (host-instance)) (use-service-modules audio desktop networking ssh xorg) (define user (user-account - (name username) - (comment username) - (group "users") - (home-directory (string-append "/home/" username)) - (supplementary-groups '("wheel" "netdev" "audio" "video")))) + (name username) + (comment username) + (group "users") + (home-directory (string-append "/home/" username)) + (supplementary-groups '("wheel" "netdev" "audio" "video")))) (operating-system - (locale "en_US.utf8") - (timezone "America/Denver") - (keyboard-layout (keyboard-layout "us")) - (host-name host-name) + (locale "en_US.utf8") + (timezone "America/Denver") + (keyboard-layout (keyboard-layout "us")) + (host-name host-name) - ;; The list of user accounts ('root' is implicit). - (users (cons* user - %base-user-accounts)) + ;; The list of user accounts ('root' is implicit). + (users (cons* user + %base-user-accounts)) - ;; Packages installed system-wide. - (packages (append (map specification->package - '("emacs" - "emacs-exwm" - "emacs-desktop-environment" - "git" - "imagemagick" - "mpd" - "mpd-mpc" - "nss-certs" - "picom" - "pulseaudio" - "vim" - "xmodmap")) - %base-packages)) + ;; Packages installed system-wide. + (packages (append (map specification->package + '("curl" + "emacs" + "emacs-exwm" + "emacs-desktop-environment" + "git" + "imagemagick" + "mpd" + "mpd-mpc" + "nss-certs" + "picom" + "pulseaudio" + "vim" + "xmodmap")) + %base-packages)) - ;; List of system services. - (services - (append (list + ;; List of system services. + (services + (append (list - (service openssh-service-type) - (service tor-service-type) - (service mpd-service-type - (mpd-configuration - (user user) - (music-directory "~/Personal/mpd/music") - (playlist-directory "~/Personal/mpd/playlist") - (default-port 6600))) - (set-xorg-configuration - (xorg-configuration (keyboard-layout keyboard-layout)))) + (service openssh-service-type) + (service tor-service-type) + (service mpd-service-type + (mpd-configuration + (user user) + (music-directory "~/Personal/mpd/music") + (playlist-directory "~/Personal/mpd/playlist") + (default-port 6600))) + (set-xorg-configuration + (xorg-configuration (keyboard-layout keyboard-layout)))) - ;; This is the default list of services we - ;; are appending to. - %desktop-services)) - (bootloader (bootloader-configuration - (bootloader grub-efi-bootloader) - (targets (list "/boot/efi")) - (keyboard-layout keyboard-layout))) + ;; This is the default list of services we + ;; are appending to. + %desktop-services)) + (bootloader (bootloader-configuration + (bootloader grub-efi-bootloader) + (targets (list "/boot/efi")) + (keyboard-layout keyboard-layout))) - ;; List of file systems that get "mounted". ("UUIDs") can - ;; be obtained by running 'blkid'. - (file-systems (cons* (file-system - (mount-point "/boot/efi") - (device (uuid - boot-part - 'fat32)) - (type "vfat")) - (file-system - (mount-point "/home/bdunahu/Personal") - (device (uuid - hide-part - 'ext4)) - (type "ext4")) - (file-system - (mount-point "/") - (device (uuid - root-part - 'ext4)) - (type "ext4")) %base-file-systems))) + ;; List of file systems that get "mounted". ("UUIDs") can + ;; be obtained by running 'blkid'. + (file-systems (cons* (file-system + (mount-point "/boot/efi") + (device (uuid + boot-part + 'fat32)) + (type "vfat")) + (file-system + (mount-point "/home/bdunahu/Personal") + (device (uuid + hide-part + 'ext4)) + (type "ext4")) + (file-system + (mount-point "/") + (device (uuid + root-part + 'ext4)) + (type "ext4")) %base-file-systems))) |