39 lines
1.7 KiB
Scheme
39 lines
1.7 KiB
Scheme
(define-module (system servers ci)
|
|
#:use-module (gnu)
|
|
#:use-module (gnu packages ci)
|
|
#:use-module (gnu services cuirass)
|
|
#:use-module (system base-system)
|
|
#:use-module (guix gexp)
|
|
#:export (ci-operating-system))
|
|
|
|
(define ci-operating-system
|
|
(operating-system
|
|
(inherit base-server-system)
|
|
(host-name "ci")
|
|
(packages (append (list cuirass) %metznet-server-packages))
|
|
(services (append (list
|
|
(service cuirass-service-type
|
|
(cuirass-configuration
|
|
(specifications #~(list (specification
|
|
(name "metznet-channel")
|
|
(build '(channels metznet-channel))
|
|
(channels
|
|
(cons (channel
|
|
(name 'metznet-channel)
|
|
(url "git://git.metznet.ca:metznet-channel.git"))
|
|
%default-channels)))))))) %metznet-server-services))
|
|
(file-systems
|
|
(cons* (file-system
|
|
(mount-point "/boot/efi")
|
|
(device (uuid "6E88-FE62" 'fat32))
|
|
(type "vfat"))
|
|
(file-system
|
|
(mount-point "/")
|
|
(device
|
|
(uuid "ba93a043-9e58-466f-b90f-bf2a6bbf91fe"
|
|
'ext4))
|
|
(type "ext4"))
|
|
%base-file-systems))))
|
|
|
|
ci-operating-system
|