mcdowell: install guix-publish-serviceHEADstagingmaster

1 files changed, 15 insertions, 3 deletions

diff --git a/deployment/systems/mcdowell.scm b/deployment/systems/mcdowell.scm
index de1f6df..2755e30 100644
--- a/deployment/systems/mcdowell.scm
+++ b/deployment/systems/mcdowell.scm
@@ -54,10 +54,21 @@
                     sovereign:channels:nonguix-channel
                     sovereign:channels:sovereign-channel-staging))))
 
+(define guix-publish-configuration
+  (gnu:services:base:guix-publish-configuration
+    (host       "0.0.0.0")
+    (port       8080)
+    (advertise? #t)))
+
+(define guix-publish-service
+  (gnu:services:service gnu:services:base:guix-publish-service-type
+                        guix-publish-configuration))
+
 (define %sovereign-services*
-  (gnu:services:modify-services sovereign:systems:%sovereign-services
-                                (gnu:services:base:guix-service-type
-                                  record => (guix-configuration record))))
+  (gnu:services:modify-services
+    sovereign:systems:%sovereign-services
+    (gnu:services:base:guix-service-type
+      record => (guix-configuration record))))
 
 (define system
   (let*
@@ -71,6 +82,7 @@
       (l-initrd-modules     (cons*  "mei_me"
                                     gnu:system:linux-initrd:%base-initrd-modules))
       (l-services           (cons*  l-guix-home-service
+                                    guix-publish-service
                                     (gnu:services:service gnu:services:ssh:openssh-service-type)
                                     sovereign:packages:protonmail:nogui-profile
                                     %sovereign-services*))