aboutsummaryrefslogtreecommitdiff
path: root/.guix/guix-na
diff options
context:
space:
mode:
authorCollin J. Doering2024-03-21 19:32:44 -0400
committerCollin J. Doering2024-03-21 19:32:44 -0400
commitcc7693af38d6a98f15e00927f1de1e1c5a11043e (patch)
tree6949975fe9894c9afb759bc589a48793229a35b5 /.guix/guix-na
parentbec6ffee65d40ec9cbf130f6a1d3e6a3d3e004ad (diff)
downloadguix-north-america-cc7693af38d6a98f15e00927f1de1e1c5a11043e.tar.gz
balg02: Make minor adjusting to allow for testing
* .guix/guix-na/config/balg02.scm (guix-na): Add function balg02 which parameterized the disk that the bootloader (grub) is installed to. This enables testing in a vm where the disk may not match what is used on the physical server.
Diffstat (limited to '.guix/guix-na')
-rw-r--r--.guix/guix-na/config/balg02.scm8
1 files changed, 5 insertions, 3 deletions
diff --git a/.guix/guix-na/config/balg02.scm b/.guix/guix-na/config/balg02.scm
index e41333a..b52f4be 100644
--- a/.guix/guix-na/config/balg02.scm
+++ b/.guix/guix-na/config/balg02.scm
@@ -27,11 +27,11 @@
#:use-module (gnu services networking)
#:use-module (gnu services ssh)
#:use-module (gnu services web)
- #:export (%system))
+ #:export (balg02 %system))
(define %automation-user "auto")
-(define %system
+(define (balg02 disk)
(operating-system
(host-name "balg02")
(timezone "US/Central")
@@ -44,7 +44,7 @@
(terminal-outputs '(console serial_1))
(serial-unit 1)
(serial-speed 115200)
- (targets '("/dev/sda"))))
+ (targets `(,disk))))
(file-systems (append
(list (file-system
@@ -117,3 +117,5 @@
(name-servers '("216.37.64.2" "216.37.64.3")))))
(service ntp-service-type))
%base-services))))
+
+(define %system (balg02 "/dev/sda"))