summaryrefslogtreecommitdiff
path: root/gnu/tests/reconfigure.scm
diff options
context:
space:
mode:
Diffstat (limited to 'gnu/tests/reconfigure.scm')
-rw-r--r--gnu/tests/reconfigure.scm15
1 files changed, 3 insertions, 12 deletions
diff --git a/gnu/tests/reconfigure.scm b/gnu/tests/reconfigure.scm
index b97fedcf6b..2fd7c6854d 100644
--- a/gnu/tests/reconfigure.scm
+++ b/gnu/tests/reconfigure.scm
@@ -79,10 +79,7 @@ generation of the system profile."
entries)))
marionette))
- (mkdir #$output)
- (chdir #$output)
-
- (test-runner-current (system-test-runner))
+ (test-runner-current (system-test-runner #$output))
(test-begin "switch-to-system")
(let ((generations-prior (system-generations marionette)))
@@ -153,10 +150,7 @@ Shepherd (PID 1) by unloading obsolete services and loading new services."
(map live-service-canonical-name (current-services)))
marionette))
- (mkdir #$output)
- (chdir #$output)
-
- (test-runner-current (system-test-runner))
+ (test-runner-current (system-test-runner #$output))
(test-begin "upgrade-services")
(let ((services-prior (running-services marionette)))
@@ -220,10 +214,7 @@ bootloader's configuration file."
(second (string-split (match:substring parameter) #\=)))
(list-matches "system=[^ ]*" grub-cfg))))
- (mkdir #$output)
- (chdir #$output)
-
- (test-runner-current (system-test-runner))
+ (test-runner-current (system-test-runner #$output))
(test-begin "install-bootloader")
(test-assert "no prior menu entry for system generation"