diff options
| author | jdlugosz963 <jdlugosz963@gmail.com> | 2023-07-05 13:59:28 +0200 |
|---|---|---|
| committer | jdlugosz963 <jdlugosz963@gmail.com> | 2023-07-05 13:59:28 +0200 |
| commit | d85086ed10809cf9864ed0321285d31c0b1f93f0 (patch) | |
| tree | 773b7336100281f9f1e1902a4d7006d2731e114e /guix/jd/desktops/berserker.scm | |
| parent | 49e0dc10749a34f66a0935c1ded8f6fa6c4b346c (diff) | |
| download | dotfiles-d85086ed10809cf9864ed0321285d31c0b1f93f0.tar.gz dotfiles-d85086ed10809cf9864ed0321285d31c0b1f93f0.zip | |
Add polkit rules and home services to my guix config.
Diffstat (limited to 'guix/jd/desktops/berserker.scm')
| -rwxr-xr-x | guix/jd/desktops/berserker.scm | 37 |
1 files changed, 37 insertions, 0 deletions
diff --git a/guix/jd/desktops/berserker.scm b/guix/jd/desktops/berserker.scm new file mode 100755 index 0000000..37135dc --- /dev/null +++ b/guix/jd/desktops/berserker.scm | |||
| @@ -0,0 +1,37 @@ | |||
| 1 | (define-module (jd desktops berserker) | ||
| 2 | #:use-module (jd desktops base) | ||
| 3 | #:use-module (gnu) | ||
| 4 | #:use-module (gnu home)) | ||
| 5 | |||
| 6 | (define home | ||
| 7 | (home-environment | ||
| 8 | (services %jd-base-home-services))) | ||
| 9 | |||
| 10 | (define system | ||
| 11 | (operating-system | ||
| 12 | (inherit odin-non-free) | ||
| 13 | (host-name "berserker") | ||
| 14 | |||
| 15 | (bootloader (bootloader-configuration | ||
| 16 | (bootloader grub-efi-bootloader) | ||
| 17 | (targets (list "/boot/efi")))) | ||
| 18 | |||
| 19 | (mapped-devices (list (mapped-device | ||
| 20 | (source (uuid | ||
| 21 | "ef754148-6f23-4d7e-92b4-7abbfe0ae201")) | ||
| 22 | (target "cryptroot") | ||
| 23 | (type luks-device-mapping)))) | ||
| 24 | |||
| 25 | (file-systems (cons* (file-system | ||
| 26 | (mount-point "/boot/efi") | ||
| 27 | (device (uuid "695E-FE22" | ||
| 28 | 'fat32)) | ||
| 29 | (type "vfat")) | ||
| 30 | (file-system | ||
| 31 | (mount-point "/") | ||
| 32 | (device "/dev/mapper/cryptroot") | ||
| 33 | (type "ext4") | ||
| 34 | (dependencies mapped-devices)) %base-file-systems)))) | ||
| 35 | |||
| 36 | |||
| 37 | (if (getenv "JD_HOME") home system) | ||
