services: provenance: Wrap config file name in 'assume-valid-file-name'.
This gets rid of a pointless 'local-file' warning when running 'guix system reconfigure FILE' and FILE is a relative file name. * gnu/services.scm (provenance-entry): Wrap CONFIG-FILE in 'assume-valid-file-name'.
This commit is contained in:
parent
5d4ad8e1be
commit
5dbfdf8be4
@ -461,7 +461,12 @@ channels in use and CONFIG-FILE, if it is true."
|
||||
|
||||
(mbegin %store-monad
|
||||
(let ((config-file (cond ((string? config-file)
|
||||
(local-file config-file "configuration.scm"))
|
||||
;; CONFIG-FILE has been passed typically via
|
||||
;; 'guix system reconfigure CONFIG-FILE' so we
|
||||
;; can assume it's valid: tell 'local-file' to
|
||||
;; not emit a warning.
|
||||
(local-file (assume-valid-file-name config-file)
|
||||
"configuration.scm"))
|
||||
((not config-file)
|
||||
#f)
|
||||
(else
|
||||
|
Loading…
Reference in New Issue
Block a user