services: static-netwoking: Wait for devices to show up.

Fixes <https://issues.guix.gnu.org/63516>.

* gnu/services/base.scm (network-set-up/linux): Add call to
'wait-for-link'.
This commit is contained in:
Ludovic Courtès 2023-06-14 23:48:01 +02:00
parent e487bd9ef5
commit 26602f4063
No known key found for this signature in database
GPG Key ID: 090B11993D9AEBB5

View File

@ -2799,6 +2799,12 @@ to CONFIG."
#$@(map (lambda (address)
#~(begin
;; Before going any further, wait for the
;; device to show up.
(wait-for-link
#$(network-address-device address)
#:blocking? #f)
(addr-add #$(network-address-device address)
#$(network-address-value address)
#:ipv6?