services: shepherd: Silence Guile warnings.

This avoids:

  WARNING: …: imported module (guix build utils) overrides core binding `delete'

* gnu/services/shepherd.scm (%default-modules): #:hide 'delete'
from (guix build utils).
(shepherd-configuration-file)[config]: Wrap calls to 'load-compiled' in
'parameterize'.
This commit is contained in:
Ludovic Courtès 2020-05-15 22:37:39 +02:00
parent 12adffd43e
commit 408ae72cd1
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5

View file

@ -146,7 +146,7 @@ (define %default-modules
;; Default set of modules visible in a service's file.
`((shepherd service)
(oop goops)
(guix build utils)
((guix build utils) #:hide (delete))
(guix build syscalls)))
(define-record-type* <shepherd-service>
@ -315,7 +315,9 @@ (define config
(call-with-error-handling
(lambda ()
(apply register-services
(map load-compiled '#$(map scm->go files)))))
(parameterize ((current-warning-port
(%make-void-port "w")))
(map load-compiled '#$(map scm->go files))))))
(format #t "starting services...~%")
(for-each (lambda (service)