system: image: Add qcow2 image type.
* gnu/system/image.scm (qcow2-image-type): New variable.
This commit is contained in:
parent
ae39b7a9a9
commit
23ad7e92b1
@ -68,6 +68,7 @@
|
||||
|
||||
image-with-os
|
||||
raw-image-type
|
||||
qcow2-image-type
|
||||
iso-image-type
|
||||
uncompressed-iso-image-type
|
||||
|
||||
@ -139,6 +140,16 @@ set to the given OS."
|
||||
(name 'raw)
|
||||
(constructor (cut image-with-os efi-disk-image <>))))
|
||||
|
||||
(define qcow2-image-type
|
||||
(image-type
|
||||
(name 'qcow2)
|
||||
(constructor (cut image-with-os
|
||||
(image
|
||||
(inherit efi-disk-image)
|
||||
(name 'image.qcow2)
|
||||
(format 'compressed-qcow2))
|
||||
<>))))
|
||||
|
||||
(define iso-image-type
|
||||
(image-type
|
||||
(name 'iso9660)
|
||||
|
Loading…
Reference in New Issue
Block a user