services: static-networking-service: Wait for udev, except for loopback.

Reported by DusXMT on #guix.

* gnu/services/networking.scm (static-networking-service): Add
  'requirement' field.  Change 'documentation' to be a string literal.
This commit is contained in:
Ludovic Courtès 2014-09-14 17:28:43 +02:00
parent 5975881687
commit 150d8e6414

View File

@ -50,9 +50,15 @@ gateway."
(with-monad %store-monad
(return
(service
;; Unless we're providing the loopback interface, wait for udev to be up
;; and running so that INTERFACE is actually usable.
(requirement (if (memq 'loopback provision)
'()
'(udev)))
(documentation
(string-append "Set up networking on the '" interface
"' interface using a static IP address."))
"Bring up the networking interface using a static IP address.")
(provision provision)
(start #~(lambda _
;; Return #t if successfully started.