blob: 2809da08a099dba7f9125c7ea89f01fff34dc61b (
about) (
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
35
36
37
38
39
40
41
42
43
44
45
46
47
|
(define-module (suweren services)
#:use-module (gnu packages cups)
#:use-module (gnu packages linux)
#:use-module (gnu services)
#:use-module (gnu services base)
#:use-module (gnu services cups)
#:use-module (gnu services desktop)
#:use-module (gnu services sddm)
#:use-module (gnu services sound)
#:use-module (gnu services syncthing)
#:use-module (gnu services xorg)
#:use-module (services plasma-desktop)
#:use-module (suweren services desktop)
#:use-module ((suweren system)
#:prefix suweren-system:)
#:use-module (suweren trezor) ; trezor-bridge
#:use-module (upstream services nbfc))
(define-public %distribution-services
(let* ((cups-configuration* (cups-configuration (web-interface? #t)))
(nbfc-configuration* (nbfc-configuration (model "Acer Nitro AN515-43")))
(sddm-configuration* (sddm-configuration ;; (display-server "wayland")
(theme "breeze")))
(cups-service (service cups-service-type
cups-configuration*))
(%desktop-services* (modify-services %desktop-services
(delete gdm-service-type)
(delete pulseaudio-service-type)
(guix-service-type configuration
=>
(suweren-system:guix configuration))))
(nbfc-service (service nbfc-service-type
nbfc-configuration*))
(plasma-desktop-service (service plasma-desktop-service-type))
(sddm-service (service sddm-service-type
sddm-configuration*))
(syncthing-service (service syncthing-service-type
(syncthing-configuration (user "marek")))))
(append %desktop-services*
bluetooth-services
trezor-bridge
(list cups-service
;; nbfc-service
plasma-desktop-service
sddm-service
syncthing-service))))
|
