diff options
| author | Marius Bakke <mbakke@fastmail.com> | 2019-05-09 19:53:05 +0200 |
|---|---|---|
| committer | Marius Bakke <mbakke@fastmail.com> | 2019-05-09 20:00:22 +0200 |
| commit | 6c2180f5d02687f6aa1a5931b29827469bdc0ba0 (patch) | |
| tree | dda5bc61cc33777a86a1d7527d76caefb2e50b66 /gnu/services | |
| parent | 5f5499d684058b2a359e9a3e8e6738bbd0c77834 (diff) | |
| download | gnu-guix-6c2180f5d02687f6aa1a5931b29827469bdc0ba0.tar gnu-guix-6c2180f5d02687f6aa1a5931b29827469bdc0ba0.tar.gz | |
services: dhcp-client: Ignore interfaces that are not ARP capable.
* gnu/services/networking.scm (dhcp-client-service-type): Filter interfaces
that do not support the ARP protocol.
Diffstat (limited to 'gnu/services')
| -rw-r--r-- | gnu/services/networking.scm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/gnu/services/networking.scm b/gnu/services/networking.scm index 03b2c6e1ec..082a85f63d 100644 --- a/gnu/services/networking.scm +++ b/gnu/services/networking.scm @@ -190,7 +190,9 @@ fe80::1%lo0 apps.facebook.com\n") ;; interfaces are typically down at this point. Thus we perform ;; our own interface discovery here. (define valid? - (negate loopback-network-interface?)) + (lambda (interface) + (and (arp-network-interface? interface) + (not (loopback-network-interface? interface))))) (define ifaces (filter valid? (all-network-interface-names))) |