mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2024-12-24 05:18:07 -05:00
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:
parent
12adffd43e
commit
408ae72cd1
1 changed files with 4 additions and 2 deletions
|
@ -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)
|
||||
|
|
Loading…
Reference in a new issue