summaryrefslogtreecommitdiff
path: root/gnu/system/image.scm
diff options
context:
space:
mode:
Diffstat (limited to 'gnu/system/image.scm')
-rw-r--r--gnu/system/image.scm3
1 files changed, 2 insertions, 1 deletions
diff --git a/gnu/system/image.scm b/gnu/system/image.scm
index a4cc2d1ef9..7efbc9fac0 100644
--- a/gnu/system/image.scm
+++ b/gnu/system/image.scm
@@ -301,7 +301,8 @@ image ~a {
}~%" #$genimage-name #$image-type (list #$@partitions-config))))))))
(computed-file "genimage.cfg" builder)))
- (let* ((substitutable? (image-substitutable? image))
+ (let* ((name (or (image-name image) name))
+ (substitutable? (image-substitutable? image))
(builder
(with-imported-modules*
(let ((inputs '#+(list genimage coreutils findutils))