os (list target))
#:disk-image-size install-size
#:file-system-type
- installation-disk-image-file-system-type)))
+ installation-disk-image-file-system-type
+ ;; Don't provide substitutes; too big.
+ #:substitutable? #f)))
(define install
(with-imported-modules '((guix build utils)
(gnu build marionette))
(exit #$(and gui-test
(gui-test #~marionette)))))))
- (gexp->derivation "installation" install)))
+ (gexp->derivation "installation" install
+ #:substitutable? #f))) ;too big
(define* (qemu-command/writable-image image #:key (memory-size 256))
"Return as a monadic value the command to run QEMU on a writable copy of