Browse Source

machine: Add provenance tracking to each machine operating system.

* gnu/machine.scm (<machine>): Rename accessor to
'%machine-operating-system'.
(machine-operating-system): New procedure.
* doc/guix.texi (Service Reference): Mention it.
gn-latest-20200428
Ludovic Courtès 2 years ago
parent
commit
eaabc5e87f
No known key found for this signature in database GPG Key ID: 90B11993D9AEBB5
  1. 4
      doc/guix.texi
  2. 7
      gnu/machine.scm

4
doc/guix.texi

@ -27129,8 +27129,8 @@ comparison less trivial.
@end quotation
This service is automatically added to your operating system
configuration when you use @command{guix system reconfigure} or
@command{guix system init}.
configuration when you use @command{guix system reconfigure},
@command{guix system init}, or @command{guix deploy}.
@end defvr
@node Shepherd Services

7
gnu/machine.scm

@ -93,11 +93,16 @@
make-machine
machine?
this-machine
(operating-system machine-operating-system) ; <operating-system>
(operating-system %machine-operating-system); <operating-system>
(environment machine-environment) ; symbol
(configuration machine-configuration ; configuration object
(default #f))) ; specific to environment
(define (machine-operating-system machine)
"Return the operating system of MACHINE."
(operating-system-with-provenance
(%machine-operating-system machine)))
(define (machine-display-name machine)
"Return the host-name identifying MACHINE."
(operating-system-host-name (machine-operating-system machine)))

Loading…
Cancel
Save