system: Add 'location' field to <operating-system>.
This allows error messages to include source location info. * gnu/system.scm (<operating-system>)[location]: New field.
This commit is contained in:
parent
a168c3e4f8
commit
9e12da319b
@ -118,6 +118,7 @@
|
||||
operating-system-sudoers-file
|
||||
operating-system-swap-devices
|
||||
operating-system-kernel-loadable-modules
|
||||
operating-system-location
|
||||
|
||||
operating-system-derivation
|
||||
operating-system-profile
|
||||
@ -255,7 +256,12 @@
|
||||
(default %setuid-programs)) ; list of string-valued gexps
|
||||
|
||||
(sudoers-file operating-system-sudoers-file ; file-like
|
||||
(default %sudoers-specification)))
|
||||
(default %sudoers-specification))
|
||||
|
||||
(location operating-system-location ; <location>
|
||||
(default (and=> (current-source-location)
|
||||
source-properties->location))
|
||||
(innate)))
|
||||
|
||||
(define (operating-system-kernel-arguments os root-device)
|
||||
"Return all the kernel arguments, including the ones not specified
|
||||
|
Loading…
Reference in New Issue
Block a user