summary refs log tree commit diff
diff options
context:
space:
mode:
authorJakob L. Kreuze <zerodaysfordays@sdf.lonestar.org>2019-07-31 14:13:01 -0400
committerDanny Milosavljevic <dannym@scratchpost.org>2019-08-02 11:20:51 +0200
commit1db6f137d93b59409fedb3deb24c876649e1b8f2 (patch)
tree13139d35770d31ade0d2ecff9c42d5017f8bc17e
parent7c13793dbc2ce575c4a489ef2e8d9ad2b658e08c (diff)
downloadguix-1db6f137d93b59409fedb3deb24c876649e1b8f2.tar.gz
reconfigure: Reload all shepherd files when upgrading services.
Fixes <https://bugs.gnu.org/36878>.
Reported by Robert Vollmert <rob@vllmrt.net>.

* guix/scripts/system/reconfigure.scm (upgrade-shepherd-services): Load
all service files, rather than just those of services to be started.

Signed-off-by: Danny Milosavljevic <dannym@scratchpost.org>
-rw-r--r--guix/scripts/system/reconfigure.scm7
1 files changed, 1 insertions, 6 deletions
diff --git a/guix/scripts/system/reconfigure.scm b/guix/scripts/system/reconfigure.scm
index 8c7d461585..dee0c24bd2 100644
--- a/guix/scripts/system/reconfigure.scm
+++ b/guix/scripts/system/reconfigure.scm
@@ -161,12 +161,7 @@ services as defined by OS."
                                              target-services)
                                         (map live-service-canonical-name
                                              live-services)))
-             (service-files
-              (map shepherd-service-file
-                   (filter (lambda (service)
-                             (memq (shepherd-service-canonical-name service)
-                                   to-start))
-                           target-services))))
+             (service-files (map shepherd-service-file target-services)))
         (eval #~(primitive-load #$(upgrade-services-program service-files
                                                             to-start
                                                             to-unload