02/03: services: dmd: Provide dmd via 'profile-service-type'.

[Ludovic Courtès]

civodul pushed a commit to branch master
in repository guix.

commit c273d81bfa560076414e7e221505f25c91232860
Author: Ludovic Courtès <address@hidden>
Date:   Wed Jan 27 15:36:27 2016 +0100

    services: dmd: Provide dmd via 'profile-service-type'.
    
    * gnu/services/dmd.scm (dmd-root-service-type): Extend
    PROFILE-SERVICE-TYPE.
    * gnu/system.scm (%base-packages): Remove dmd.
---
 gnu/services/dmd.scm |    6 ++++--
 gnu/system.scm       |    2 +-
 2 files changed, 5 insertions(+), 3 deletions(-)

diff --git a/gnu/services/dmd.scm b/gnu/services/dmd.scm
index 545087a..fb3d332 100644
--- a/gnu/services/dmd.scm
+++ b/gnu/services/dmd.scm
@@ -1,5 +1,5 @@
 ;;; GNU Guix --- Functional package management for GNU
-;;; Copyright © 2013, 2014, 2015 Ludovic Courtès <address@hidden>
+;;; Copyright © 2013, 2014, 2015, 2016 Ludovic Courtès <address@hidden>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -88,7 +88,9 @@
    ;; list of services provided by the extensions.
    (compose concatenate)
    (extend append)
-   (extensions (list (service-extension boot-service-type dmd-boot-gexp)))))
+   (extensions (list (service-extension boot-service-type dmd-boot-gexp)
+                     (service-extension profile-service-type
+                                        (const (list dmd)))))))
 
 (define %dmd-root-service
   ;; The root dmd service, aka. PID 1.  Its parameter is a list of
diff --git a/gnu/system.scm b/gnu/system.scm
index edcfaf6..4072e31 100644
--- a/gnu/system.scm
+++ b/gnu/system.scm
@@ -353,7 +353,7 @@ explicitly appear in OS."
   ;; Default set of packages globally visible.  It should include anything
   ;; required for basic administrator tasks.
   (cons* procps psmisc which less zile nano
-         (@ (gnu packages admin) dmd) guix
+         guix
          lsof                                 ;for Guix's 'list-runtime-roots'
          pciutils usbutils
          util-linux inetutils isc-dhcp