aboutsummaryrefslogtreecommitdiff
path: root/tests/internet
diff options
context:
space:
mode:
Diffstat (limited to 'tests/internet')
-rw-r--r--tests/internet/system.scm24
1 files changed, 12 insertions, 12 deletions
diff --git a/tests/internet/system.scm b/tests/internet/system.scm
index c0e5986..84471d2 100644
--- a/tests/internet/system.scm
+++ b/tests/internet/system.scm
@@ -1,6 +1,6 @@
(use-modules
((org euandre queue) #:prefix q:)
- ((org euandre services) #:prefix serv:)
+ ((org euandre packages) #:prefix pkg:)
(gnu))
(use-package-modules)
(use-service-modules
@@ -12,7 +12,7 @@
ssh)
(define (path s)
- (serv:str (dirname (dirname (dirname (current-filename)))) "/" s))
+ (pkg:str (dirname (dirname (dirname (current-filename)))) "/" s))
(define +users+
`(("user1" "I'm a user" ())
@@ -20,30 +20,30 @@
(operating-system
(host-name "a-internet-test-host")
- (skeletons serv:skeletons)
- (users (append (serv:user-accounts +users+) %base-user-accounts))
+ (skeletons pkg:skeletons)
+ (users (append (pkg:user-accounts +users+) %base-user-accounts))
(services
(append
(list
(service ntp-service-type)
(service dhcp-client-service-type)
(service fail2ban-service-type)
- (service serv:binder-service-type)
- (service serv:glaze-service-type)
- (service serv:untls-service-type)
- (service serv:wscat-service-type)
- (service serv:papod-service-type)
- (service openssh-service-type (q:openssh-default-configuration (serv:users->keys +users+)))
+ (service pkg:binder-service-type)
+ (service pkg:glaze-service-type)
+ (service pkg:untls-service-type)
+ (service pkg:wscat-service-type)
+ (service pkg:papod-service-type)
+ (service openssh-service-type (q:openssh-default-configuration (pkg:users->keys +users+)))
(service certbot-service-type (q:tld-certbot-configuration "tld.local"))
(service cgit-service-type q:cgit-pre-configuration)
- (service serv:syskeep-service-type)
+ (service pkg:syskeep-service-type)
(service q:shadow-group-service-type)
(service q:dkimproxyout-service-type)
(service q:cyrus-sasl-service-type)
(service q:dovecot-service-type)
(service q:internet-postfix-service-type)
(service mail-aliases-service-type '()))
- serv:base-services))
+ pkg:base-services))
(bootloader
(bootloader-configuration
(bootloader grub-bootloader)))