From 485819c180becf783a2a34a3477dff126e6147f0 Mon Sep 17 00:00:00 2001
From: Efraim Flashner <efraim@flashner.co.il>
Date: Tue, 13 Jan 2026 14:58:33 +0200
Subject: system: images: Add image names.

* gnu/system/images/a20-olinuxino-lime2.scm
(a20-olinuxino-lime2-image-type):
* gnu/system/images/novena.scm (novena-image-type),
* gnu/system/images/orangepi-r1-plus-lts-rk3328.scm
(orangepi-r1-plus-lts-rk3328-image-type),
* gnu/system/images/pine64.scm (pine64-image-type),
* gnu/system/images/pinebook-pro.scm (pinebook-pro-image-type),
* gnu/system/images/rock-4c-plus.scm (rock-4c-plus-image-type),
* gnu/system/images/rock64.scm (rock64-image-type):  Add name field to
constructor.
* gnu/system/images/unmatched.scm (unmatched-disk-image),
* gnu/system/images/visionfive2.scm (visionfive2-disk-image): Add name
field.

Change-Id: Id64082f912e6346c1f3b47619ce31f129612ff34
Signed-off-by: Efraim Flashner <efraim@flashner.co.il>
---
 gnu/system/images/a20-olinuxino-lime2.scm         | 1 +
 gnu/system/images/novena.scm                      | 1 +
 gnu/system/images/orangepi-r1-plus-lts-rk3328.scm | 1 +
 gnu/system/images/pine64.scm                      | 1 +
 gnu/system/images/pinebook-pro.scm                | 1 +
 gnu/system/images/rock-4c-plus.scm                | 1 +
 gnu/system/images/rock64.scm                      | 1 +
 gnu/system/images/unmatched.scm                   | 1 +
 gnu/system/images/visionfive2.scm                 | 1 +
 9 files changed, 9 insertions(+)

(limited to 'gnu')

diff --git a/gnu/system/images/a20-olinuxino-lime2.scm b/gnu/system/images/a20-olinuxino-lime2.scm
index ecab516650..32e41f893f 100644
--- a/gnu/system/images/a20-olinuxino-lime2.scm
+++ b/gnu/system/images/a20-olinuxino-lime2.scm
@@ -55,6 +55,7 @@
    (constructor (lambda (os)
                   (image
                    (inherit (raw-with-offset-disk-image (* 8192 512)))
+                   (name 'a20-olinuxino-lime2-disk-image)
                    (operating-system os)
                    (platform armv7-linux))))))
 
diff --git a/gnu/system/images/novena.scm b/gnu/system/images/novena.scm
index 810e2bed5f..e71f0d8e66 100644
--- a/gnu/system/images/novena.scm
+++ b/gnu/system/images/novena.scm
@@ -56,6 +56,7 @@
    (constructor (lambda (os)
                   (image
                    (inherit (raw-with-offset-disk-image))
+                   (name 'novena-disk-image)
                    (operating-system os)
                    (platform armv7-linux))))))
 
diff --git a/gnu/system/images/orangepi-r1-plus-lts-rk3328.scm b/gnu/system/images/orangepi-r1-plus-lts-rk3328.scm
index 0229f75f1d..5b1c7f3dfc 100644
--- a/gnu/system/images/orangepi-r1-plus-lts-rk3328.scm
+++ b/gnu/system/images/orangepi-r1-plus-lts-rk3328.scm
@@ -61,6 +61,7 @@
               (constructor (lambda (os)
                              (image (inherit (raw-with-offset-disk-image (expt
                                                                           2 24)))
+                                    (name 'orangepi-r1-plus-lts-rk3328-disk-image)
                                     (operating-system
                                       os)
                                     (platform aarch64-linux))))))
diff --git a/gnu/system/images/pine64.scm b/gnu/system/images/pine64.scm
index bd7a39ee75..cccbb81265 100644
--- a/gnu/system/images/pine64.scm
+++ b/gnu/system/images/pine64.scm
@@ -67,6 +67,7 @@
    (constructor (lambda (os)
                   (image
                    (inherit (raw-with-offset-disk-image))
+                   (name 'pine64-disk-image)
                    (operating-system os)
                    (platform aarch64-linux))))))
 
diff --git a/gnu/system/images/pinebook-pro.scm b/gnu/system/images/pinebook-pro.scm
index 2282e13719..f108c7ffe4 100644
--- a/gnu/system/images/pinebook-pro.scm
+++ b/gnu/system/images/pinebook-pro.scm
@@ -62,6 +62,7 @@
                   (image
                    (inherit
                     (raw-with-offset-disk-image (* 16 (expt 2 20)))) ;16MiB
+                   (name 'pinebook-pro-disk-image)
                    (operating-system os)
                    (platform aarch64-linux))))))
 
diff --git a/gnu/system/images/rock-4c-plus.scm b/gnu/system/images/rock-4c-plus.scm
index d669e3a163..293a117d1e 100644
--- a/gnu/system/images/rock-4c-plus.scm
+++ b/gnu/system/images/rock-4c-plus.scm
@@ -68,6 +68,7 @@
    (constructor (lambda (os)
                   (image
                    (inherit (raw-with-offset-disk-image (expt 2 24)))
+                   (name 'rock-4c-plus-disk-image)
                    (operating-system os)
                    (platform aarch64-linux))))))
 
diff --git a/gnu/system/images/rock64.scm b/gnu/system/images/rock64.scm
index 1fb6b7ddbc..aa8f1c40e5 100644
--- a/gnu/system/images/rock64.scm
+++ b/gnu/system/images/rock64.scm
@@ -57,6 +57,7 @@
    (constructor (lambda (os)
                   (image
                    (inherit (raw-with-offset-disk-image (expt 2 24)))
+                   (name 'rock64-disk-image)
                    (operating-system os)
                    (platform aarch64-linux))))))
 
diff --git a/gnu/system/images/unmatched.scm b/gnu/system/images/unmatched.scm
index b4e2d7b18b..b5d13abd56 100644
--- a/gnu/system/images/unmatched.scm
+++ b/gnu/system/images/unmatched.scm
@@ -60,6 +60,7 @@
 
 (define unmatched-disk-image
   (image-without-os
+   (name 'unmatched-disk-image)
    (format 'disk-image)
    (partition-table-type 'gpt)
    ;; https://source.denx.de/u-boot/u-boot/-/blob/master/doc/board/sifive/unmatched.rst
diff --git a/gnu/system/images/visionfive2.scm b/gnu/system/images/visionfive2.scm
index 11826d01b2..ee0682b6fc 100644
--- a/gnu/system/images/visionfive2.scm
+++ b/gnu/system/images/visionfive2.scm
@@ -99,6 +99,7 @@
 
 (define visionfive2-disk-image
   (image-without-os
+   (name 'visionfive2-disk-image)
    (format 'disk-image)
    (partition-table-type 'gpt)
    (partitions (list
-- 
cgit v1.3