[bug#27520] [PATCH] build: Use "GUIXSD" as root label.

[Danny Milosavljevic]

* gnu/build/vm.scm (initialize-hard-disk): Make grub search for label "GUIXSD".
* gnu/system/install.scm (installation-os): Set filesystem root label to 
"GUIXSD".
* gnu/system/vm.scm (system-disk-image): Set filesystem root label to "GUIXSD".
---
 gnu/build/vm.scm       | 2 +-
 gnu/system/install.scm | 2 +-
 gnu/system/vm.scm      | 2 +-
 3 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/gnu/build/vm.scm b/gnu/build/vm.scm
index 57619764c..6b91e767f 100644
--- a/gnu/build/vm.scm
+++ b/gnu/build/vm.scm
@@ -398,7 +398,7 @@ passing it a directory name where it is mounted."
           (lambda (port)
             (format port
                     "insmod part_msdos~@
-                    search --set=root --label gnu-disk-image~@
+                    search --set=root --label GUIXSD~@
                     configfile /boot/grub/grub.cfg~%")))
 
         (display "creating EFI firmware image...")
diff --git a/gnu/system/install.scm b/gnu/system/install.scm
index 0a78d030d..24c736304 100644
--- a/gnu/system/install.scm
+++ b/gnu/system/install.scm
@@ -300,7 +300,7 @@ Use Alt-F2 for documentation.
      ;; the appropriate one.
      (cons* (file-system
               (mount-point "/")
-              (device "gnu-disk-image")
+              (device "GUIXSD")
               (title 'label)
               (type "ext4"))
 
diff --git a/gnu/system/vm.scm b/gnu/system/vm.scm
index 392737d07..6fae999ef 100644
--- a/gnu/system/vm.scm
+++ b/gnu/system/vm.scm
@@ -282,7 +282,7 @@ to USB sticks meant to be read-only."
     ;; Volume name of the root file system.  Since we don't know which device
     ;; will hold it, we use the volume name to find it (using the UUID would
     ;; be even better, but somewhat less convenient.)
-    "gnu-disk-image")
+    "GUIXSD")
 
   (define file-systems-to-keep
     (remove (lambda (fs)