summaryrefslogtreecommitdiff
path: root/suweren/system.scm
diff options
context:
space:
mode:
authorMarek Paśnikowski <marek@marekpasnikowski.pl>2024-07-25 16:09:29 +0200
committerMarek Paśnikowski <marek@marekpasnikowski.pl>2024-07-25 16:09:29 +0200
commit47df1eb7aed542f2dfe4a91e7626b0ee64372d4a (patch)
treef3fd42a4750e0ef58652ac5d1f7d9efe03d0dd26 /suweren/system.scm
parentfd961826595882a6c7836b2e63747faf3f020d45 (diff)
feat!(system): implement services* argument in %suweren-operating-system
Diffstat (limited to 'suweren/system.scm')
-rw-r--r--suweren/system.scm7
1 files changed, 5 insertions, 2 deletions
diff --git a/suweren/system.scm b/suweren/system.scm
index d7797e3..3cdd427 100644
--- a/suweren/system.scm
+++ b/suweren/system.scm
@@ -88,6 +88,7 @@
;; string ->
;; (record file-system) ->
;; (record user-account) ->
+;; (record service) ->
;; record operating-system
(define-public (%suweren-operating-system kernel*
bootloader-configuration*
@@ -95,7 +96,8 @@
firmware*
host-name*
file-systems*
- users*)
+ users*
+ services*)
(let* ((sddm-configuration* (sddm-configuration (theme "breeze")))
(plasma-desktop (service plasma-desktop-service-type))
@@ -114,7 +116,8 @@
sddm))
(services* (append %desktop-services*
- suweren-services))
+ suweren-services
+ services*))
(users* (append %base-user-accounts
users*)))
(operating-system (kernel kernel*)