Docker group.

This commit is contained in:
Gabriel Simmer 2021-09-07 23:14:17 +01:00
parent 7911802203
commit 29f00b0bcb
3 changed files with 8 additions and 4 deletions

View file

@ -95,6 +95,7 @@ EndSection
"video"))) "video")))
%base-user-accounts)) %base-user-accounts))
(groups (cons (user-group (system? #t) (name "realtime")) (groups (cons (user-group (system? #t) (name "realtime"))
(user-group (system? #t (name "docker")))
%base-groups)) %base-groups))
(packages (append (list (packages (append (list
@ -112,6 +113,7 @@ EndSection
(services (append (list (service gnome-desktop-service-type) (services (append (list (service gnome-desktop-service-type)
(set-xorg-configuration (set-xorg-configuration
(xorg-configuration (xorg-configuration
(keyboard-layout keyboard-layout)))) (keyboard-layout keyboard-layout)))
(service docker-service-type))
%desktop-services)) %desktop-services))
(name-service-switch %mdns-host-lookup-nss))) (name-service-switch %mdns-host-lookup-nss)))

View file

@ -8,4 +8,4 @@
(bootloader (bootloader-configuration (bootloader (bootloader-configuration
(bootloader grub-bootloader) (bootloader grub-bootloader)
(target "/boot") (target "/boot")
(keyboard-layout keyboard-layout)))) (keyboard-layout (keyboard-layout "us")))))

View file

@ -138,6 +138,7 @@ in a typing install of Guix/Linux.
"video"))) "video")))
%base-user-accounts)) %base-user-accounts))
(groups (cons (user-group (system? #t) (name "realtime")) (groups (cons (user-group (system? #t) (name "realtime"))
(user-group (system? #t (name "docker")))
%base-groups)) %base-groups))
(packages (append (list (packages (append (list
@ -155,7 +156,8 @@ in a typing install of Guix/Linux.
(services (append (list (service gnome-desktop-service-type) (services (append (list (service gnome-desktop-service-type)
(set-xorg-configuration (set-xorg-configuration
(xorg-configuration (xorg-configuration
(keyboard-layout keyboard-layout)))) (keyboard-layout keyboard-layout)))
(service docker-service-type))
%desktop-services)) %desktop-services))
(name-service-switch %mdns-host-lookup-nss))) (name-service-switch %mdns-host-lookup-nss)))
#+end_src #+end_src
@ -207,5 +209,5 @@ This applies to any random Guix VM I spin up, usually for testing configurations
(bootloader (bootloader-configuration (bootloader (bootloader-configuration
(bootloader grub-bootloader) (bootloader grub-bootloader)
(target "/boot") (target "/boot")
(keyboard-layout keyboard-layout)))) (keyboard-layout (keyboard-layout "us")))))
#+end_src #+end_src