blob: 0939760f2e1655fed3018fd90d1d19bd081038a4 (
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 (kbg services desktop)
#:use-module (kbg)
#:use-module (guix)
#:use-module (gnu services)
#:use-module (gnu services base)
#:use-module (gnu services dbus)
#:use-module (gnu services desktop)
#:use-module (gnu packages gnome)
#:use-module (gnu packages linux)
#:use-module (gnu packages networking)
#:use-module (gnu services networking)
#:use-module (gnu services sound)
#:use-module (gnu services xorg)
#:use-module (gnu packages vpn)
#:export (%kbg-desktop-services))
(define %kbg-desktop-services
(modify-services %desktop-services
(guix-service-type config =>
(guix-configuration
(inherit config)
(substitute-urls
(append %default-substitute-urls
(list "https://substitutes.nonguix.org"
"https://substitutes.guix.pyschonotebook.org")))
(authorized-keys
(append %default-authorized-guix-keys
(list (local-file (string-append %dotfiles-root
"keys/guix/substitutes.nonguix.org.pub"))
(local-file (string-append %dotfiles-root
"keys/guix/substitutes.guix.psychonotebook.org.pub")))))))
(network-manager-service-type config =>
(network-manager-configuration
(inherit config)
(vpn-plugins (list network-manager-openvpn
network-manager-vpnc
network-manager-openconnect))))
(gdm-service-type config =>
(gdm-configuration
(inherit config)
(wayland? #t)))
(dbus-root-service-type config =>
(dbus-configuration
(inherit config)
(verbose? #f)
(services (list gdm))))
(delete pulseaudio-service-type)))
|