@@ -1112,6 +1112,7 @@ Analysis and Reporting Technology) functionality.")
(inputs
`(("acl" ,acl)
("cryptsetup" ,cryptsetup)
+ ("dosfstools" ,dosfstools)
("libatasmart" ,libatasmart)
("libblockdev" ,libblockdev)
("libgudev" ,libgudev)
@@ -1163,6 +1164,7 @@ Analysis and Reporting Technology) functionality.")
(let ((out (assoc-ref outputs "out"))
(utils (assoc-ref inputs "util-linux"))
(cryptsetup (assoc-ref inputs "cryptsetup"))
+ (dosfstools (assoc-ref inputs "dosfstools"))
(parted (assoc-ref inputs "parted")))
(wrap-program (string-append out "/libexec/udisks2/udisksd")
`("PATH" ":" prefix
@@ -1170,6 +1172,8 @@ Analysis and Reporting Technology) functionality.")
;; cryptsetup is required for setting encrypted
;; partitions, e.g. in gnome-disks
,(string-append cryptsetup "/sbin")
+ ;; Required to format FAT file systems in gnome-disks
+ ,(string-append dosfstools "/sbin")
"/run/current-system/profile/bin"
"/run/current-system/profile/sbin")))
#t))))))