futurile/guix-play
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

system: Add 'location' field to <operating-system>.

Browse Source 
This allows error messages to include source location info.

* gnu/system.scm (<operating-system>)[location]: New field.
This commit is contained in:
Ludovic Courtès 2020-07-15 01:31:23 +02:00
parent a168c3e4f8
commit 9e12da319b
No known key found for this signature in database
GPG Key ID: 090B11993D9AEBB5
1 changed files with 7 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
gnu/system.scm
View File

@ -118,6 +118,7 @@
operating-system-sudoers-file operating-system-sudoers-file
operating-system-swap-devices operating-system-swap-devices
operating-system-kernel-loadable-modules operating-system-kernel-loadable-modules
operating-system-location
operating-system-derivation operating-system-derivation
operating-system-profile operating-system-profile
@ -255,7 +256,12 @@
(default %setuid-programs)) ; list of string-valued gexps (default %setuid-programs)) ; list of string-valued gexps
(sudoers-file operating-system-sudoers-file ; file-like (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) (define (operating-system-kernel-arguments os root-device)
"Return all the kernel arguments, including the ones not specified "Return all the kernel arguments, including the ones not specified