diff options
| -rw-r--r-- | gnu/system/image.scm | 25 |
1 files changed, 17 insertions, 8 deletions
diff --git a/gnu/system/image.scm b/gnu/system/image.scm index a0e6bf31f1..6c4573509d 100644 --- a/gnu/system/image.scm +++ b/gnu/system/image.scm @@ -538,14 +538,23 @@ image, depending on IMAGE format." #:inputs `(("system" ,os) ("bootcfg" ,bootcfg)))) ((iso9660) - (system-iso9660-image image* - #:bootcfg bootcfg - #:bootloader bootloader - #:register-closures? register-closures? - #:inputs `(("system" ,os) - ("bootcfg" ,bootcfg)) - #:grub-mkrescue-environment - '(("MKRESCUE_SED_MODE" . "mbr_hfs"))))))) + (system-iso9660-image + image* + #:bootcfg bootcfg + #:bootloader bootloader + #:register-closures? register-closures? + #:inputs `(("system" ,os) + ("bootcfg" ,bootcfg)) + ;; Make sure to use a mode that does no imply + ;; HFS+ tree creation that may fail with: + ;; + ;; "libisofs: FAILURE : Too much files to mangle, + ;; cannot guarantee unique file names" + ;; + ;; This happens if some limits are exceeded, see: + ;; https://lists.gnu.org/archive/html/grub-devel/2020-06/msg00048.html + #:grub-mkrescue-environment + '(("MKRESCUE_SED_MODE" . "mbr_only"))))))) (define (find-image file-system-type) "Find and return an image that could match the given FILE-SYSTEM-TYPE. This |