aboutsummaryrefslogtreecommitdiff
path: root/gnu/tests/container/test-system.scm
diff options
context:
space:
mode:
authorChristopher Baines <mail@cbaines.net>2017-08-12 14:27:00 +0100
committerChristopher Baines <mail@cbaines.net>2017-08-15 21:01:33 +0100
commit62b13accad4e1df51bc4e887f32271f127645c72 (patch)
treef98fd4eff2106efd48642b3ed8f267052319d2c8 /gnu/tests/container/test-system.scm
parent52435fe90090db459d8946ecc993d47015f68c6d (diff)
downloadguix-62b13accad4e1df51bc4e887f32271f127645c72.tar
guix-62b13accad4e1df51bc4e887f32271f127645c72.tar.gz
Diffstat (limited to 'gnu/tests/container/test-system.scm')
-rw-r--r--gnu/tests/container/test-system.scm26
1 files changed, 26 insertions, 0 deletions
diff --git a/gnu/tests/container/test-system.scm b/gnu/tests/container/test-system.scm
new file mode 100644
index 0000000000..03b26a691a
--- /dev/null
+++ b/gnu/tests/container/test-system.scm
@@ -0,0 +1,26 @@
+(define-module (gnu tests container test-system)
+ #:use-module (gnu)
+ #:use-module (gnu packages package-management)
+ #:export (%system))
+
+(define %system
+ (operating-system
+ (host-name "guix-container")
+ (timezone "Europe/Berlin")
+ (locale "en_US.utf8")
+
+ (packages (cons* guix
+ %base-packages))
+
+ ;; TODO file-systems is redundant
+ (file-systems
+ (cons (file-system
+ (device "my-root")
+ (title 'label)
+ (mount-point "/")
+ (type "ext4"))
+ %base-file-systems))
+
+ (bootloader (grub-configuration (device "/dev/sdX")))))
+
+%system