diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2019-12-07 23:16:40 +0100 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2019-12-08 00:47:26 +0100 |
| commit | a1d7920861a8d6c6774149eaf939eb2636942090 (patch) | |
| tree | efaff4d16b328112f28259fa260e4ec107789ce3 /gnu/machine.scm | |
| parent | deeaa9e1993b9c4684be8879d154000d234a5c24 (diff) | |
| download | gnu-guix-a1d7920861a8d6c6774149eaf939eb2636942090.tar gnu-guix-a1d7920861a8d6c6774149eaf939eb2636942090.tar.gz | |
machine: Remove unnecessary record self-referencing bindings.
'this-machine' and 'this-machine-ssh-configuration' were useless given
that there are no thunked fields.
* gnu/machine.scm (<machine>)[this-machine]: Remove.
* gnu/machine/ssh.scm (<machine-ssh-configuration>)
[this-machine-ssh-configuration]: Remove.
Diffstat (limited to 'gnu/machine.scm')
| -rw-r--r-- | gnu/machine.scm | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/gnu/machine.scm b/gnu/machine.scm index b342fe2144..bdd92d9592 100644 --- a/gnu/machine.scm +++ b/gnu/machine.scm @@ -33,7 +33,6 @@ machine machine? - this-machine machine-operating-system machine-environment @@ -89,10 +88,8 @@ ;;; Declarations for machines in a deployment. ;;; -(define-record-type* <machine> machine - make-machine +(define-record-type* <machine> machine make-machine machine? - this-machine (operating-system %machine-operating-system); <operating-system> (environment machine-environment) ; symbol (configuration machine-configuration ; configuration object |