diff options
author | Ludovic Courtès <ludo@gnu.org> | 2021-10-27 12:26:31 +0200 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2021-12-12 23:20:50 +0100 |
commit | 5967aee398c26a4814da1d8dba3f2dba84b06a4b (patch) | |
tree | bc6b08807abc7ac3eb4afdd3265dc12c341e8ba3 /gnu/system | |
parent | 1644f4f1f8957f3f3a88037aed80d501fdceaae7 (diff) | |
download | guix-5967aee398c26a4814da1d8dba3f2dba84b06a4b.tar.gz |
services: Define '%loopback-static-networking'.
* gnu/services/base.scm (%loopback-static-networking): New variable. (%base-services): Use it. * gnu/system/hurd.scm (%base-services/hurd): Use it. * gnu/system/install.scm (%installation-services): Use it. * doc/guix.texi (Networking Setup): Document it.
Diffstat (limited to 'gnu/system')
-rw-r--r-- | gnu/system/hurd.scm | 8 | ||||
-rw-r--r-- | gnu/system/install.scm | 8 |
2 files changed, 2 insertions, 14 deletions
diff --git a/gnu/system/hurd.scm b/gnu/system/hurd.scm index ec8484d746..2acc7b7e11 100644 --- a/gnu/system/hurd.scm +++ b/gnu/system/hurd.scm @@ -79,13 +79,7 @@ (service hurd-getty-service-type (hurd-getty-configuration (tty "tty2"))) (service static-networking-service-type - (list (static-networking - (addresses - (list (network-address - (device "lo") - (value "127.0.0.1")))) - (requirement '()) - (provision '(loopback))) + (list %loopback-static-networking ;; QEMU user-mode networking. To get "eth0", you need ;; QEMU to emulate a device for which Mach has an diff --git a/gnu/system/install.scm b/gnu/system/install.scm index bdfe580145..073d7df1db 100644 --- a/gnu/system/install.scm +++ b/gnu/system/install.scm @@ -408,13 +408,7 @@ Access documentation at any time by pressing Alt-F2.\x1b[0m ;; Loopback device, needed by OpenSSH notably. (service static-networking-service-type - (list (static-networking - (addresses - (list (network-address - (device "lo") - (value "127.0.0.1")))) - (requirement '()) - (provision '(loopback))))) + (list %loopback-static-networking)) (service wpa-supplicant-service-type) (dbus-service) |