summaryrefslogtreecommitdiff
path: root/suweren/services.scm
diff options
context:
space:
mode:
Diffstat (limited to 'suweren/services.scm')
-rw-r--r--suweren/services.scm22
1 files changed, 5 insertions, 17 deletions
diff --git a/suweren/services.scm b/suweren/services.scm
index faa8036..2809da0 100644
--- a/suweren/services.scm
+++ b/suweren/services.scm
@@ -9,19 +9,13 @@
#:use-module (gnu services sound)
#:use-module (gnu services syncthing)
#:use-module (gnu services xorg)
- #:use-module (services guix channels)
- #:use-module (services nonguix substitute)
#: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 (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* ((cups-configuration* (cups-configuration (web-interface? #t)))
(nbfc-configuration* (nbfc-configuration (model "Acer Nitro AN515-43")))
@@ -33,15 +27,9 @@
(%desktop-services* (modify-services %desktop-services
(delete gdm-service-type)
(delete pulseaudio-service-type)
- (guix-service-type configuration
- =>
- (guix-options configuration))
- (guix-service-type configuration
- =>
- (channels configuration))
- (guix-service-type configuration
- =>
- (nonguix-substitute configuration))))
+ (guix-service-type configuration
+ =>
+ (suweren-system:guix configuration))))
(nbfc-service (service nbfc-service-type
nbfc-configuration*))
(plasma-desktop-service (service plasma-desktop-service-type))