diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2019-05-16 14:42:40 +0200 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2019-05-16 14:42:40 +0200 |
| commit | 9c64080dce9fa3e77c48ae962ff1edc5d0863c6a (patch) | |
| tree | 67ec4e4404810cb0270219bcc7c2bac9170b5596 | |
| parent | fc0680929ded80a5ccdc0131613cb0679b54145d (diff) | |
vm-image: Remove ModemManager.
This is a followup to 36f5d78d4af02ad23c33bfb46702d92086bf2796.
* gnu/system/examples/vm-image.tmpl (services): Remove
MODEM-MANAGER-SERVICE-TYPE.
| -rw-r--r-- | gnu/system/examples/vm-image.tmpl | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/gnu/system/examples/vm-image.tmpl b/gnu/system/examples/vm-image.tmpl index 1ba47a166af..7d984155bc6 100644 --- a/gnu/system/examples/vm-image.tmpl +++ b/gnu/system/examples/vm-image.tmpl | |||
| @@ -92,15 +92,16 @@ root ALL=(ALL) ALL | |||
| 92 | ;; Use the DHCP client service rather than NetworkManager. | 92 | ;; Use the DHCP client service rather than NetworkManager. |
| 93 | (service dhcp-client-service-type)) | 93 | (service dhcp-client-service-type)) |
| 94 | 94 | ||
| 95 | ;; Remove GDM, NetworkManager, and wpa-supplicant, which don't make | 95 | ;; Remove GDM, ModemManager, NetworkManager, and wpa-supplicant, |
| 96 | ;; sense in a VM. | 96 | ;; which don't make sense in a VM. |
| 97 | (remove (lambda (service) | 97 | (remove (lambda (service) |
| 98 | (let ((type (service-kind service))) | 98 | (let ((type (service-kind service))) |
| 99 | (or (memq type | 99 | (or (memq type |
| 100 | (list gdm-service-type | 100 | (list gdm-service-type |
| 101 | wpa-supplicant-service-type | 101 | wpa-supplicant-service-type |
| 102 | cups-pk-helper-service-type | 102 | cups-pk-helper-service-type |
| 103 | network-manager-service-type)) | 103 | network-manager-service-type |
| 104 | modem-manager-service-type)) | ||
| 104 | (eq? 'network-manager-applet | 105 | (eq? 'network-manager-applet |
| 105 | (service-type-name type))))) | 106 | (service-type-name type))))) |
| 106 | (modify-services %desktop-services | 107 | (modify-services %desktop-services |
