diff options
author | Marek Paśnikowski <marek@marekpasnikowski.pl> | 2024-08-18 21:51:20 +0200 |
---|---|---|
committer | Marek Paśnikowski <marek@marekpasnikowski.pl> | 2024-08-18 21:51:20 +0200 |
commit | 00e2ae47adbf80b33cbb56cec1d31630c8c347d6 (patch) | |
tree | b918e958345e43182f9f842be1b13a4544656ea7 /systems | |
parent | 9f355ffc1ebb67f2fd4d2962f712590be23290f5 (diff) |
feat(systems): install akashi system on thinkpad-x200
Diffstat (limited to 'systems')
-rw-r--r-- | systems/akashi.scm | 54 |
1 files changed, 54 insertions, 0 deletions
diff --git a/systems/akashi.scm b/systems/akashi.scm new file mode 100644 index 0000000..fc62273 --- /dev/null +++ b/systems/akashi.scm @@ -0,0 +1,54 @@ +(define-module (systems akashi) + #:use-module (gnu services) ; service + #:use-module (gnu services guix) ; guix-home-service-type + #:use-module (gnu system keyboard) ; keyboard-layout + #:use-module (machines thinkpad-x200) ; bootloader-configuration* + ; file-systems* + ; firmware* + ; hardware-groups + ; initrd* + ; kernel* + ; swap-devices* + #:use-module (suweren system) ; %suweren-operating-system + #:use-module (users id1000) ; uid1000-account + ; uid1000-home-environment + ; uid1000-name + ) + +;; string +(define host-name* + "akashi") + +;; (record user-account) +(define users* + (let* ((system-groups (list "wheel")) + + (supplementary-groups* (append hardware-groups + system-groups))) + (list (uid1000-account supplementary-groups*)))) + +;; record operating-system +(define-public operating-system* + (let* ((home-environments `((,uid1000-name ,(uid1000-home-environment host-name*)))) + + (guix-home (service guix-home-service-type + home-environments)) + + (keyboard-layout* (keyboard-layout "pl")) + (services* (list guix-home)) + (timezone* "Europe/Warsaw") + (locale* "pl_PL.utf8")) + (%suweren-operating-system kernel* + (bootloader-configuration* keyboard-layout*) + keyboard-layout* + initrd* + firmware* + host-name* + (file-systems* host-name*) + (swap-devices* host-name*) + users* + timezone* + locale* + services*))) + +operating-system* |