blob: 1fc9985d058f5d5d2ea663dae5757c5b999b7792 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
|
(define-module (suweren services)
#:use-module (gnu packages linux)
#:use-module (gnu services)
#:use-module (gnu services base)
#:use-module (gnu services desktop)
#:use-module (gnu services sound)
#:use-module (services guix channels)
#:use-module (services nonguix substitute)
#:use-module (services plasma-desktop)
#:use-module (upstream services nbfc))
(define (guix-options configuration-record)
(let ((extra-options (list "--gc-keep-derivations=yes"
"--gc-keep-outputs=yes")))
(guix-configuration (inherit configuration-record)
(extra-options extra-options))))
(define-public %distribution-services
(let* ((%desktop-services* (modify-services %desktop-services
(delete pulseaudio-service-type)
(guix-service-type configuration
=>
(guix-options configuration))
(guix-service-type configuration
=>
(channels configuration))
(guix-service-type configuration
=>
(nonguix-substitute configuration))))
(nbfc-service (service nbfc-service-type
(nbfc-configuration (model "Acer Nitro AN515-43")))))
(append %desktop-services*
(list plasma-desktop-service
nbfc-service))))
|
