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
1 changed files with 6 additions and 2 deletions

View File

@ -579,8 +579,12 @@ PATTERN, a string. When PATTERN is #f, display all the system generations."
(* 70 (expt 2 20)))
#:mappings mappings))
((disk-image)
(system-disk-image os #:disk-image-size image-size
#:file-system-type file-system-type))))
(system-disk-image os
#: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)
"Suggest running 'guix pull' if this has never been done before."