mirror of
https://git.savannah.gnu.org/git/guix.git
synced 2025-01-31 23:06:59 +01:00
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.
This commit is contained in:
parent
5f5499d684
commit
6c2180f5d0
1 changed files with 3 additions and 1 deletions
|
@ -190,7 +190,9 @@ (define pid-file
|
||||||
;; interfaces are typically down at this point. Thus we perform
|
;; interfaces are typically down at this point. Thus we perform
|
||||||
;; our own interface discovery here.
|
;; our own interface discovery here.
|
||||||
(define valid?
|
(define valid?
|
||||||
(negate loopback-network-interface?))
|
(lambda (interface)
|
||||||
|
(and (arp-network-interface? interface)
|
||||||
|
(not (loopback-network-interface? interface)))))
|
||||||
(define ifaces
|
(define ifaces
|
||||||
(filter valid? (all-network-interface-names)))
|
(filter valid? (all-network-interface-names)))
|
||||||
|
|
||||||
|
|
Loading…
Reference in a new issue