guix-commits
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

02/05: vm-image: Remove ModemManager.


From: guix-commits
Subject: 02/05: vm-image: Remove ModemManager.
Date: Thu, 16 May 2019 12:59:12 -0400 (EDT)

civodul pushed a commit to branch version-1.0.1
in repository guix.

commit 9c64080dce9fa3e77c48ae962ff1edc5d0863c6a
Author: Ludovic Court├Ęs <address@hidden>
Date:   Thu May 16 14:42:40 2019 +0200

    vm-image: Remove ModemManager.
    
    This is a followup to 36f5d78d4af02ad23c33bfb46702d92086bf2796.
    
    * gnu/system/examples/vm-image.tmpl (services): Remove
    MODEM-MANAGER-SERVICE-TYPE.
---
 gnu/system/examples/vm-image.tmpl | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/gnu/system/examples/vm-image.tmpl 
b/gnu/system/examples/vm-image.tmpl
index 1ba47a1..7d98415 100644
--- a/gnu/system/examples/vm-image.tmpl
+++ b/gnu/system/examples/vm-image.tmpl
@@ -92,15 +92,16 @@ root ALL=(ALL) ALL
                  ;; Use the DHCP client service rather than NetworkManager.
                  (service dhcp-client-service-type))
 
-           ;; Remove GDM, NetworkManager, and wpa-supplicant, which don't make
-           ;; sense in a VM.
+           ;; Remove GDM, ModemManager, NetworkManager, and wpa-supplicant,
+           ;; which don't make sense in a VM.
            (remove (lambda (service)
                      (let ((type (service-kind service)))
                        (or (memq type
                                  (list gdm-service-type
                                        wpa-supplicant-service-type
                                        cups-pk-helper-service-type
-                                       network-manager-service-type))
+                                       network-manager-service-type
+                                       modem-manager-service-type))
                            (eq? 'network-manager-applet
                                 (service-type-name type)))))
                    (modify-services %desktop-services



reply via email to

[Prev in Thread] Current Thread [Next in Thread]