From 850b457bfdb1303383630afefb5bc21661f0900f Mon Sep 17 00:00:00 2001
From: Marek Paśnikowski <marek@marekpasnikowski.pl>
Date: Tue, 28 May 2024 10:58:19 +0200
Subject: refactor %distribution-services for the proper distribution name

---
 suweren/services.scm | 20 ++++++++++++++++++++
 1 file changed, 20 insertions(+)
 create mode 100644 suweren/services.scm

(limited to 'suweren/services.scm')

diff --git a/suweren/services.scm b/suweren/services.scm
new file mode 100644
index 0000000..1cd2467
--- /dev/null
+++ b/suweren/services.scm
@@ -0,0 +1,20 @@
+(define-module (suweren services)
+  #:use-module (gnu services)
+  #:use-module (gnu services base)
+  #:use-module (gnu services desktop)
+  #:use-module (services guix channels)
+  #:use-module (services nonguix substitute)
+  #:use-module (services plasma-desktop))
+
+(define-public %distribution-services
+  (let ((%desktop-services*
+	 (modify-services %desktop-services
+			  (guix-service-type config
+					     =>
+					     (channels config))
+			  (guix-service-type config
+					     =>
+					     (nonguix-substitute config)))))
+
+    (append %desktop-services*
+	    (list plasma-desktop-service))))
-- 
cgit v1.2.3