guix system: Use "image.iso" as the name of ISO images.

* guix/scripts/system.scm (system-derivation-for-action): Pass #:name to
'system-disk-image'.
This commit is contained in:
Ludovic Courtès 2017-07-18 21:39:56 +02:00
parent 8d033e3e16
commit 5058bf5684
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5

View file

@ -579,8 +579,12 @@ (define* (system-derivation-for-action os action
(* 70 (expt 2 20))) (* 70 (expt 2 20)))
#:mappings mappings)) #:mappings mappings))
((disk-image) ((disk-image)
(system-disk-image os #:disk-image-size image-size (system-disk-image os
#:file-system-type file-system-type)))) #:name (match file-system-type
("iso9660" "image.iso")
(_ "disk-image"))
#:disk-image-size image-size
#:file-system-type file-system-type))))
(define (maybe-suggest-running-guix-pull) (define (maybe-suggest-running-guix-pull)
"Suggest running 'guix pull' if this has never been done before." "Suggest running 'guix pull' if this has never been done before."