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/services/base.scm | |
parent | 1644f4f1f8957f3f3a88037aed80d501fdceaae7 (diff) | |
download | guix-5967aee398c26a4814da1d8dba3f2dba84b06a4b.tar 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/services/base.scm')
-rw-r--r-- | gnu/services/base.scm | 17 |
1 files changed, 11 insertions, 6 deletions
diff --git a/gnu/services/base.scm b/gnu/services/base.scm index 31b418dabf..5f93483dda 100644 --- a/gnu/services/base.scm +++ b/gnu/services/base.scm @@ -116,6 +116,7 @@ static-networking-service static-networking-service-type + %loopback-static-networking %qemu-static-networking udev-configuration @@ -2710,6 +2711,15 @@ to handle." (provision (or provision '(networking))) (name-servers name-servers))))) +(define %loopback-static-networking + ;; The loopback device. + (static-networking + (addresses (list (network-address + (device "lo") + (value "127.0.0.1")))) + (requirement '()) + (provision '(loopback)))) + (define %qemu-static-networking ;; Networking configuration for QEMU's user-mode network stack (info "(QEMU) ;; Using the user mode network stack"). @@ -2754,12 +2764,7 @@ to handle." (tty "tty6"))) (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)) (syslog-service) (service urandom-seed-service-type) (service guix-service-type) |