image: system-iso9660-image: Propagate image-name to derivation name.

* gnu/system/image.scm (system-iso9660-image): Use name from image-name
instead of hardcoded image.iso.

Change-Id: I3cea3857729c2eb7d6728f650db7fb33cf4c8c8a
Signed-off-by: Rutherther <rutherther@ditigal.xyz>
This commit is contained in:
Rutherther 2025-12-16 12:12:37 +01:00
parent 86a6006f41
commit d226cc4933
No known key found for this signature in database
GPG key ID: 0322798269E471C3

View file

@ -674,6 +674,10 @@ used in the image. "
(uuid-bytevector (partition-uuid partition)))))
(let* ((os (image-operating-system image))
(image-name (image-name image))
(name (if image-name
(symbol->string image-name)
name))
(bootloader (bootloader-package bootloader))
(compression? (image-compression? image))
(substitutable? (image-substitutable? image))