From 261e39fc2cdd5fe73221efca6bc14787f77d090a Mon Sep 17 00:00:00 2001
From: David Wilson <david@daviwil.com>
Date: Sat, 5 Jun 2021 13:00:05 -0700
Subject: [PATCH] Add build-iso.sh script for local image generation

---
 build-iso.sh | 9 +++++++++
 1 file changed, 9 insertions(+)
 create mode 100755 build-iso.sh

diff --git a/build-iso.sh b/build-iso.sh
new file mode 100755
index 0000000..be34adc
--- /dev/null
+++ b/build-iso.sh
@@ -0,0 +1,9 @@
+#!/bin/sh
+
+# Write out the current channels to be included with the image
+guix describe -f channels > channels.scm
+
+# Build the image and copy it to the current directory
+image=$(guix system image -t iso9660 installer.scm)
+echo "Built image: $image"
+cp $image ./guix-installer.iso