From 124d66843469e8df8f3dd645bba422afed08d996 Mon Sep 17 00:00:00 2001 From: Marek Paśnikowski Date: Mon, 3 Jun 2024 11:26:50 +0200 Subject: implement nbfc service --- suweren/services.scm | 27 +++++++++++++++------------ 1 file changed, 15 insertions(+), 12 deletions(-) (limited to 'suweren') diff --git a/suweren/services.scm b/suweren/services.scm index 9674808..be06206 100644 --- a/suweren/services.scm +++ b/suweren/services.scm @@ -1,22 +1,25 @@ (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 (services plasma-desktop) + #:use-module (upstream services nbfc)) (define-public %distribution-services - (let ((%desktop-services* - (modify-services %desktop-services - (delete pulseaudio-service-type) - (guix-service-type config - => - (channels config)) - (guix-service-type config - => - (nonguix-substitute config))))) - + (let* ((%desktop-services* (modify-services %desktop-services + (delete pulseaudio-service-type) + (guix-service-type config + => + (channels config)) + (guix-service-type config + => + (nonguix-substitute config)))) + (nbfc-service (service nbfc-service-type + (nbfc-configuration (model "Acer Nitro AN515-43"))))) (append %desktop-services* - (list plasma-desktop-service)))) + (list plasma-desktop-service + nbfc-service)))) -- cgit v1.2.3