From 7ea41a207b347a66277e432e478226c46d0b1872 Mon Sep 17 00:00:00 2001 From: Marek Paśnikowski Date: Thu, 26 Mar 2026 18:41:05 +0100 Subject: use the generic guix-publish-service function --- deployment/systems/aisaka.scm | 20 +++++++++++--------- 1 file changed, 11 insertions(+), 9 deletions(-) (limited to 'deployment/systems/aisaka.scm') diff --git a/deployment/systems/aisaka.scm b/deployment/systems/aisaka.scm index 56dad04..fabc36c 100644 --- a/deployment/systems/aisaka.scm +++ b/deployment/systems/aisaka.scm @@ -69,6 +69,8 @@ #:prefix sovereign:devices:amd64:) #:use-module ((sovereign packages jekyll) #:prefix sovereign:packages:jekyll:) + #:use-module ((sovereign services) + #:prefix sovereign:services:) #:use-module ((sovereign systems) #:prefix sovereign:systems:) #:use-module ((users id1000) @@ -680,21 +682,21 @@ (name "vmail") (system? #t))) -(define guix-publish-service - (let - ((configuration (gnu:services:base:guix-publish-configuration - (host "192.168.10.2") - (port 8080) - (advertise? #t)))) - (gnu:services:service gnu:services:base:guix-publish-service-type - configuration))) - (define named-home-environments (list users:id1000:named-home-environment)) +(define guix-publish-configuration + (gnu:services:base:guix-publish-configuration + (host "192.168.10.2") + (port 8080) + (advertise? #t))) + (define guix-home-service (sovereign:systems:guix-home-service named-home-environments)) +(define-public guix-publish-service + (sovereign:services:guix-publish-service guix-publish-configuration)) + (define-public system (gnu:system:operating-system (kernel nongnu:packages:linux:linux) -- cgit v1.3