Remove unused zoom user
systems/tachikoma.scm
39 | 39 | (type "ext4") | |
40 | 40 | (dependencies mapped-devices)) | |
41 | 41 | %base-file-systems)) | |
42 | - | (users (cons | |
43 | - | (user-account | |
44 | - | (name "zoom") | |
45 | - | (group "users") | |
46 | - | (home-directory "/home/zoom")) | |
47 | - | (map | |
48 | - | (lambda (user) | |
49 | - | (if (equal? (user-account-name user) "tyreunom") | |
50 | - | (user-account | |
51 | - | (inherit user) | |
52 | - | (supplementary-groups | |
53 | - | (cons "libvirt" (user-account-supplementary-groups user)))) | |
54 | - | user)) | |
55 | - | (operating-system-users system)))) | |
42 | + | (users (map | |
43 | + | (lambda (user) | |
44 | + | (if (equal? (user-account-name user) "tyreunom") | |
45 | + | (user-account | |
46 | + | (inherit user) | |
47 | + | (supplementary-groups | |
48 | + | (cons "libvirt" (user-account-supplementary-groups user)))) | |
49 | + | user)) | |
50 | + | (operating-system-users system))) | |
56 | 51 | (services | |
57 | 52 | (cons* | |
58 | 53 | (service libvirt-service-type |