28 lines
888 B
Scheme
28 lines
888 B
Scheme
(use-modules (gnu)
|
|
(gnu services desktop)
|
|
(gnu system))
|
|
(use-modules (nongnu packages linux)
|
|
(nongnu system linux-initrd))
|
|
|
|
(load "system.common.scm")
|
|
|
|
(let ((os (install-to (uuid "60c115b5-08f2-435b-95e5-d3b81ffba4f4" 'ext4))))
|
|
(operating-system
|
|
(inherit os)
|
|
(host-name "rose")
|
|
(services
|
|
(append
|
|
(list (pam-mount
|
|
"kook"
|
|
"/dev/disk/by-uuid/c896e07f-d2ed-4390-8ce0-b82080d1bdc2"))
|
|
(desktop-environment (operating-system-keyboard-layout os))
|
|
(nonguix %desktop-services)))
|
|
(kernel linux)
|
|
(initrd microcode-initrd)
|
|
(firmware (list linux-firmware))
|
|
(file-systems
|
|
(cons* (file-system
|
|
(mount-point "/boot/efi")
|
|
(device (uuid "545B-970F" 'fat32))
|
|
(type "vfat"))
|
|
(operating-system-file-systems os)))))
|