aboutsummaryrefslogtreecommitdiff
path: root/gnu/services/networking.scm
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2014-07-12 22:46:44 +0200
committerLudovic Courtès <ludo@gnu.org>2014-07-12 23:17:53 +0200
commit4a3b3b073a37ca5f3dcaa09cf6d19f3b1b76e3ca (patch)
tree8825efe37ebab06b2cfccd371ece705352bd36b9 /gnu/services/networking.scm
parentf111b327a960b7cdfe77557dc06b5706a72e38dd (diff)
downloadguix-4a3b3b073a37ca5f3dcaa09cf6d19f3b1b76e3ca.tar
guix-4a3b3b073a37ca5f3dcaa09cf6d19f3b1b76e3ca.tar.gz
services: Provide a 'loopback' service by default.
* gnu/services/networking.scm (static-networking-service): Add #:provision parameter; use it. * gnu/services/base.scm (%base-services): Call 'static-networking-service' for "lo".
Diffstat (limited to 'gnu/services/networking.scm')
-rw-r--r--gnu/services/networking.scm3
1 files changed, 2 insertions, 1 deletions
diff --git a/gnu/services/networking.scm b/gnu/services/networking.scm
index ccc322648b..f03161fe58 100644
--- a/gnu/services/networking.scm
+++ b/gnu/services/networking.scm
@@ -33,6 +33,7 @@
(define* (static-networking-service interface ip
#:key
gateway
+ (provision '(networking))
(name-servers '())
(inetutils inetutils)
(net-tools net-tools))
@@ -49,7 +50,7 @@ gateway."
(documentation
(string-append "Set up networking on the '" interface
"' interface using a static IP address."))
- (provision '(networking))
+ (provision provision)
(start #~(lambda _
;; Return #t if successfully started.
(and (zero? (system* (string-append #$inetutils