vm-image: Remove ModemManager.

This is a followup to 36f5d78d4a.

* gnu/system/examples/vm-image.tmpl (services): Remove
MODEM-MANAGER-SERVICE-TYPE.
This commit is contained in:
Ludovic Courtès 2019-05-16 14:42:40 +02:00
parent fc0680929d
commit 9c64080dce
No known key found for this signature in database
GPG Key ID: 090B11993D9AEBB5
1 changed files with 4 additions and 3 deletions

View File

@ -92,15 +92,16 @@ root ALL=(ALL) ALL
;; Use the DHCP client service rather than NetworkManager. ;; Use the DHCP client service rather than NetworkManager.
(service dhcp-client-service-type)) (service dhcp-client-service-type))
;; Remove GDM, NetworkManager, and wpa-supplicant, which don't make ;; Remove GDM, ModemManager, NetworkManager, and wpa-supplicant,
;; sense in a VM. ;; which don't make sense in a VM.
(remove (lambda (service) (remove (lambda (service)
(let ((type (service-kind service))) (let ((type (service-kind service)))
(or (memq type (or (memq type
(list gdm-service-type (list gdm-service-type
wpa-supplicant-service-type wpa-supplicant-service-type
cups-pk-helper-service-type cups-pk-helper-service-type
network-manager-service-type)) network-manager-service-type
modem-manager-service-type))
(eq? 'network-manager-applet (eq? 'network-manager-applet
(service-type-name type))))) (service-type-name type)))))
(modify-services %desktop-services (modify-services %desktop-services