(build-image
(image
(inherit efi-disk-image)
- (size (* 1500 MiB))
(operating-system installation-os))))
,(->job 'iso9660-image
(build-image
(map (lambda (image)
(->job (image-name image) (build-image image)))
%guix-system-images)
- '())
- '())))
+ '()))
+ '()))
(define channel-build-system
;; Build system used to "convert" a channel instance to a package.