;; add this directory to the load path. (add-to-load-path (dirname (current-filename))) ;; Indicate which modules to import to access the variables ;; used in this configuration. (use-modules (gnu) (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")))) (operating-system (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)) ;; 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 (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))) ;; 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)))