[PATCH] reconfigure: Skip starting new shepherd services with auto-start? #f

Recipients:(address . guix-patches@gnu.org)(name . Richard Sent)(address . richard@freakingpenguin.com)

Message-ID:7370708f69a563b3f1a264c97b83d4e0e1707461.1710445211.git.richard@freakingpenguin.com

* guix/scripts/system/reconfigure.scm (upgrade-shepherd-services): Only add

new shepherd services with auto-start? #t to to-start list.

Change-Id: I268b921336fb1195ed76746eb6178889dbc258b4

---

guix/scripts/system/reconfigure.scm | 3 ++-

1 file changed, 2 insertions(+), 1 deletion(-)

Toggle diff (18 lines)diff --git a/guix/scripts/system/reconfigure.scm b/guix/scripts/system/reconfigure.scm
index ff6242ffb4..9418060158 100644
--- a/guix/scripts/system/reconfigure.scm
+++ b/guix/scripts/system/reconfigure.scm
@@ -194,7 +194,8 @@ (define* (upgrade-shepherd-services eval os)
                             (filter live-service-running live-services)))
            (to-start   (lset-difference eqv?
                                         (map shepherd-service-canonical-name
-                                             target-services)
+                                             (filter shepherd-service-auto-start?
+                                                     target-services))
                                         running))
            (service-files (map shepherd-service-file target-services)))
       (eval #~(parameterize ((current-warning-port (%make-void-port "w")))

base-commit: 7319b4d5286d31a9c6a889e81af72308efdaab41
-- 
2.41.0