diff options
author | Marius Bakke <mbakke@fastmail.com> | 2019-10-21 00:33:43 +0200 |
---|---|---|
committer | Marius Bakke <mbakke@fastmail.com> | 2019-10-21 00:33:43 +0200 |
commit | 023522d3a1e81fe9bc803183337fdc8c183a88c4 (patch) | |
tree | ec374744812891a627f33fa457b0bcf083e2c142 /guix/scripts/system/reconfigure.scm | |
parent | 07abc851ce8a580253061e065b31a4037d2f965d (diff) | |
parent | 7373eb8304e0ebbfabe66deb59e78187013403dd (diff) |
Merge branch 'master' into staging
Diffstat (limited to 'guix/scripts/system/reconfigure.scm')
-rw-r--r-- | guix/scripts/system/reconfigure.scm | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/guix/scripts/system/reconfigure.scm b/guix/scripts/system/reconfigure.scm index 579b7fffbe..2f9dbb2508 100644 --- a/guix/scripts/system/reconfigure.scm +++ b/guix/scripts/system/reconfigure.scm @@ -136,7 +136,10 @@ canonical names (symbols)." (srfi srfi-1)) ;; Load the service files for any new services. - (load-services/safe '#$service-files) + ;; Silence messages coming from shepherd such as "Evaluating + ;; expression ..." since they are unhelpful. + (parameterize ((shepherd-message-port (%make-void-port "w"))) + (load-services/safe '#$service-files)) ;; Unload obsolete services and start new services. (for-each unload-service '#$to-unload) |