aboutsummaryrefslogtreecommitdiff
path: root/gnu/services/base.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/base.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/base.scm')
-rw-r--r--gnu/services/base.scm3
1 files changed, 3 insertions, 0 deletions
diff --git a/gnu/services/base.scm b/gnu/services/base.scm
index fb2e2928a6..eb7c9dce04 100644
--- a/gnu/services/base.scm
+++ b/gnu/services/base.scm
@@ -20,6 +20,7 @@
#:use-module ((guix store)
#:select (%store-prefix))
#:use-module (gnu services)
+ #:use-module (gnu services networking)
#:use-module (gnu system shadow) ; 'user-account', etc.
#:use-module (gnu system linux) ; 'pam-service', etc.
#:use-module (gnu packages admin)
@@ -461,6 +462,8 @@ This is the GNU operating system, welcome!\n\n")))
(mingetty-service "tty4" #:motd motd)
(mingetty-service "tty5" #:motd motd)
(mingetty-service "tty6" #:motd motd)
+ (static-networking-service "lo" "127.0.0.1"
+ #:provision '(loopback))
(syslog-service)
(guix-service)
(nscd-service)