55 lines
2 KiB
Scheme
55 lines
2 KiB
Scheme
(define-module (guix-config system base-system)
|
|
#:use-module (gnu)
|
|
#:use-module (guix)
|
|
#:export (base-system))
|
|
|
|
(use-service-modules cups desktop networking ssh xorg pm)
|
|
|
|
(define %my-desktop-services
|
|
(modify-services %desktop-services
|
|
(delete gdm-service-type)))
|
|
|
|
(define base-system
|
|
(operating-system
|
|
(locale "ru_RU.utf8")
|
|
(timezone "Europe/Berlin")
|
|
(keyboard-layout (keyboard-layout "eu,ru"
|
|
#:options '("grp:alt_shift_toggle")))
|
|
(host-name "base-system")
|
|
|
|
(users (cons* (user-account
|
|
(name "kylekrein")
|
|
(comment "Aleksandr Lebedev")
|
|
(group "users")
|
|
(home-directory "/home/kylekrein")
|
|
(supplementary-groups '("wheel" "netdev" "audio" "video")))
|
|
%base-user-accounts))
|
|
|
|
;; Below is the list of system services. To search for available
|
|
;; services, run 'guix system search KEYWORD' in a terminal.
|
|
(services
|
|
(append (list
|
|
;; To configure OpenSSH, pass an 'openssh-configuration'
|
|
;; record as a second argument to 'service' below.
|
|
(service openssh-service-type)
|
|
(service cups-service-type)
|
|
(service gnome-keyring-service-type)
|
|
(service bluetooth-service-type)
|
|
(service power-profiles-daemon-service-type)
|
|
(set-xorg-configuration
|
|
(xorg-configuration (keyboard-layout keyboard-layout))))
|
|
|
|
;; This is the default list of services we
|
|
;; are appending to.
|
|
%my-desktop-services))
|
|
(bootloader (bootloader-configuration
|
|
(bootloader grub-bootloader)
|
|
(targets '("/dev/vda"))
|
|
(terminal-outputs '(console))
|
|
(keyboard-layout keyboard-layout)))
|
|
|
|
(file-systems (cons (file-system
|
|
(mount-point "/")
|
|
(device "/dev/vda1")
|
|
(type "ext4"))
|
|
%base-file-systems))))
|