Fix bootloader config

Julien LepillerMon Apr 18 10:39:01+0200 2022

fe919d0

Fix bootloader config

systems/sybil.scm

2828 
    (keyboard-layout (keyboard-layout "fr" "bepo"))
2929 
    (bootloader
3030 
      (bootloader-configuration
31-
        (target "/boot/efi")
31+
        (targets (list "/boot/efi"))
3232 
        (bootloader grub-efi-bootloader)
33-
	(keyboard-layout keyboard-layout)))
33+
        (keyboard-layout keyboard-layout)))
3434 
    (mapped-devices
3535 
      (list (mapped-device
3636 
              (source
37-
                (uuid "7f0ef292-5d1f-4cde-8a59-074178c6903d"))
37+
                (uuid "4d5c6df3-622f-41f4-85ee-c61be5538b6f"))
3838 
              (target "cryptroot")
3939 
              (type luks-device-mapping))))
4040 
    (file-systems

…

4949 
               (dependencies mapped-devices))
5050 
             %base-file-systems))
5151 
    (users (map
52-
	     (lambda (user)
53-
	       (if (equal? (user-account-name user) "tyreunom")
54-
		 (user-account
55-
		   (inherit user)
56-
		   (supplementary-groups
57-
		     (cons* "libvirt" "kvm"
58-
			    (user-account-supplementary-groups user))))
59-
		 user))
60-
	     (operating-system-users system)))
52+
             (lambda (user)
53+
               (if (equal? (user-account-name user) "tyreunom")
54+
                 (user-account
55+
                   (inherit user)
56+
                   (supplementary-groups
57+
                     (cons* "libvirt" "kvm"
58+
                            (user-account-supplementary-groups user))))
59+
                 user))
60+
             (operating-system-users system)))
6161 
    (services
6262 
      (cons*
63-
	(service libvirt-service-type
64-
		 (libvirt-configuration
65-
		   (unix-sock-group "libvirt")))
66-
	(service virtlog-service-type
67-
		 (virtlog-configuration
68-
		   (max-clients 1000)))
69-
	desktop-services))))
63+
        (service libvirt-service-type
64+
                 (libvirt-configuration
65+
                   (unix-sock-group "libvirt")))
66+
        (service virtlog-service-type
67+
                 (virtlog-configuration
68+
                   (max-clients 1000)))
69+
        desktop-services))))