Am Montag, dem 19.02.2024 um 14:25 -0800 schrieb antlers: > ``` > (define (os-with-yubi parent users*) > (modify-record parent > (groups -> (cons (user-group (name "plugdev")) <>)) > (users -> (map (lambda (user) > (if (member (user-account-name user) > users*) > (modify-record user > (supplementary-groups -> (cons "plugdev" > <>))) > user)) > <>)) > (services => (append <> (list > (service pcscd-service-type) > (simple-service 'u2f-udev-rules udev-service-type > (list (specification->package "libu2f-host"))) > (simple-service 'yubi-udev-rules udev-service-type > (list (specification->package "yubikey- > personalization")))))))) > ``` That looks like a nice syntax indeed. Is the code behind it small enough to include it in (guix records)? If so, would you care to submit it via the usual contribution channels?
Cheers
