summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMarek Paśnikowski <marekpasnikowski@protonmail.com>2022-10-31 16:38:01 +0100
committerMarek Paśnikowski <marekpasnikowski@protonmail.com>2022-10-31 16:38:01 +0100
commit9fff67a8ca0354c54ee77d00c5a888e188fbe69b (patch)
tree379965b55407c8351ef7e3fcbb8c6594116abf95
parentf4f9e4c6f53ccb86dc102f7d8962e5422db7dadf (diff)
System configuration: break out system-services
-rw-r--r--system-configuration.scm19
1 files changed, 11 insertions, 8 deletions
diff --git a/system-configuration.scm b/system-configuration.scm
index 006d633..bff6a6b 100644
--- a/system-configuration.scm
+++ b/system-configuration.scm
@@ -67,15 +67,18 @@
(append system-packages'
%base-packages))
+(define system-services
+ `(,(service cups-service-type
+ (cups-configuration (extensions `(,cups-filters
+ ,epson-inkjet-printer-escpr))
+ (web-interface? #t)))
+ ,(service openssh-service-type)
+ ,(service gnome-desktop-service-type)
+ ,(service tor-service-type)
+ ,(set-xorg-configuration (xorg-configuration (keyboard-layout keyboard-layout)))))
+
(define services
- (append `(,(service cups-service-type
- (cups-configuration (extensions `(,cups-filters
- ,epson-inkjet-printer-escpr))
- (web-interface? #t)))
- ,(service openssh-service-type)
- ,(service gnome-desktop-service-type)
- ,(service tor-service-type)
- ,(set-xorg-configuration (xorg-configuration (keyboard-layout keyboard-layout))))
+ (append system-services
%desktop-services))
(operating-system (locale locale)