03/05: guix: self: Do not install (gnu system install).

[guix-commits]

mothacehe pushed a commit to branch wip-newt-installer
in repository guix.

commit 7b4729ad9eeb83280626af95881746d0072e14e8
Author: Mathieu Othacehe <address@hidden>
Date:   Fri Nov 23 11:22:35 2018 +0900

    guix: self: Do not install (gnu system install).
    
    As we do not want to add a dependency to newt and the graphical installer
    in (guix self), do not install (gnu system install).
    
    * guix/self.scm (*system-modules*): Remove (gnu system install) from
    "guix-system" scheme-node.
---
 guix/self.scm | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/guix/self.scm b/guix/self.scm
index 96fef44..9392214 100644
--- a/guix/self.scm
+++ b/guix/self.scm
@@ -596,7 +596,11 @@ assumed to be part of MODULES."
     (scheme-node "guix-system"
                  `((gnu system)
                    (gnu services)
-                   ,@(scheme-modules* source "gnu/system")
+                   ,@(filter-map
+                      (match-lambda
+                        (('gnu 'system 'install) #f)
+                        (name name))
+                      (scheme-modules* source "gnu/system"))
                    ,@(scheme-modules* source "gnu/services"))
                  (list *core-package-modules* *package-modules*
                        *extra-modules* *core-modules*)
@@ -799,7 +803,6 @@ assumed to be part of MODULES."
                ;; made relative to a nonexistent anonymous module.
                #:splice? #t))
 
-
 
 ;;;
 ;;; Building.