diff options
author | Ludovic Courtès <ludo@gnu.org> | 2019-04-26 18:24:55 +0200 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2019-04-26 18:24:55 +0200 |
commit | d7b05620a923757e0fee0888202f69cb96c348c8 (patch) | |
tree | f22a075a60db40071497c6bed9a5ad12421bdbd2 | |
parent | a9a0790376c54c9f205a1633ce54dadd204e784e (diff) | |
download | guix-d7b05620a923757e0fee0888202f69cb96c348c8.tar.gz |
vm-image: Remove NetworkManager & co. and add the DHCP client.
* gnu/system/examples/vm-image.tmpl (services): Remove wpa-supplicant, cups-pk-helper, and NetworkManager. Add DHCP-CLIENT-SERVICE-TYPE.
-rw-r--r-- | gnu/system/examples/vm-image.tmpl | 16 |
1 files changed, 12 insertions, 4 deletions
diff --git a/gnu/system/examples/vm-image.tmpl b/gnu/system/examples/vm-image.tmpl index 62ed032731..b6f9daaf61 100644 --- a/gnu/system/examples/vm-image.tmpl +++ b/gnu/system/examples/vm-image.tmpl @@ -5,7 +5,7 @@ ;; (use-modules (gnu) (srfi srfi-1)) -(use-service-modules xorg desktop) +(use-service-modules desktop networking xorg) (use-package-modules bootloaders nvi wget xorg) (define vm-image-motd (plain-file "motd" " @@ -71,11 +71,19 @@ accounts.\x1b[0m (default-user "guest") (xorg-configuration (xorg-configuration - (keyboard-layout keyboard-layout)))))) + (keyboard-layout keyboard-layout))))) - ;; Remove GDM. + ;; 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 (lambda (service) - (eq? gdm-service-type (service-kind service))) + (let ((type (service-kind service))) + (memq type (list gdm-service-type + wpa-supplicant-service-type + cups-pk-helper-service-type + network-manager-service-type)))) (modify-services %desktop-services (login-service-type config => (login-configuration |