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:
parent
fc0680929d
commit
9c64080dce
|
@ -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
|
||||||
|
|
Loading…
Reference in New Issue