sbotools2

commit 2e773e67617e3ee3b9d30ed2365579ef18aa3a29
parent 09c2d3d1e618e2cc73298a88eee2b7835c9f8461
Author: Andreas Guldstrand <andreas.guldstrand@gmail.com>
Date:   Fri, 18 Dec 2015 00:28:05 +0100

Fix old run syntax to use new script syntax in *.t files

Diffstat:
M
t/env.t
 | 
6
+++---
M
t/install.t
 | 
6
+++---
M
t/remove.t
 | 
6
+++---

3 files changed, 9 insertions(+), 9 deletions(-)
diff --git a/t/env.t b/t/env.t
@@ -52,12 +52,12 @@ sub set_lo {
 	state $set = 0;
 	state $lo;
 	if ($_[0]) {
-		if ($set) { run (cmd => [qw/ sboconfig -o /, $lo], test => 0); }
+		if ($set) { script (qw/ sboconfig -o /, $lo, { test => 0 }); }
 	} else {
-		($lo) = run (cmd => [qw/ sboconfig -l /], expected => qr/LOCAL_OVERRIDES=(.*)/, test => 0);
+		($lo) = script (qw/ sboconfig -l /, { expected => qr/LOCAL_OVERRIDES=(.*)/, test => 0 });
 		note "Saving original value of LOCAL_OVERRIDES: $lo";
 		$set = 1;
-		run (cmd => [qw/ sboconfig -o /, "$RealBin/LO"], test => 0);
+		script (qw/ sboconfig -o /, "$RealBin/LO", { test => 0 });
 	}
 }
 
diff --git a/t/install.t b/t/install.t
@@ -49,12 +49,12 @@ sub set_lo {
 	state $set = 0;
 	state $lo;
 	if ($_[0]) {
-		if ($set) { run (cmd => [qw/ sboconfig -o /, $lo], test => 0); }
+		if ($set) { script (qw/ sboconfig -o /, $lo, { test => 0 }); }
 	} else {
-		($lo) = run (cmd => [qw/ sboconfig -l /], expected => qr/LOCAL_OVERRIDES=(.*)/, test => 0);
+		($lo) = script (qw/ sboconfig -l /, { expected => qr/LOCAL_OVERRIDES=(.*)/, test => 0 });
 		note "Saving original value of LOCAL_OVERRIDES: $lo";
 		$set = 1;
-		run (cmd => [qw/ sboconfig -o /, "$RealBin/LO"], test => 0);
+		script (qw/ sboconfig -o /, "$RealBin/LO", { test => 0 });
 	}
 }
 
diff --git a/t/remove.t b/t/remove.t
@@ -49,12 +49,12 @@ sub set_lo {
 	state $set = 0;
 	state $lo;
 	if ($_[0]) {
-		if ($set) { run (cmd => [qw/ sboconfig -o /, $lo], test => 0); }
+		if ($set) { script (qw/ sboconfig -o /, $lo, { test => 0 }); }
 	} else {
-		($lo) = run (cmd => [qw/ sboconfig -l /], expected => qr/LOCAL_OVERRIDES=(.*)/, test => 0);
+		($lo) = script (qw/ sboconfig -l /, { expected => qr/LOCAL_OVERRIDES=(.*)/, test => 0 });
 		note "Saving original value of LOCAL_OVERRIDES: $lo";
 		$set = 1;
-		run (cmd => [qw/ sboconfig -o /, "$RealBin/LO"], test => 0);
+		script (qw/ sboconfig -o /, "$RealBin/LO", { test => 0 });
 	}
 }