summary refs log tree commit diff
path: root/gnu/system/image.scm
diff options
context:
space:
mode:
Diffstat (limited to 'gnu/system/image.scm')
-rw-r--r--gnu/system/image.scm11
1 files changed, 11 insertions, 0 deletions
diff --git a/gnu/system/image.scm b/gnu/system/image.scm
index c81054f847..d8d5882a54 100644
--- a/gnu/system/image.scm
+++ b/gnu/system/image.scm
@@ -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)