From 41f42ddf65b53e665a4fc0aa303c26f59bc31acf Mon Sep 17 00:00:00 2001
From: Andreas Guldstrand <andreas.guldstrand@gmail.com>
Date: Sun, 7 Aug 2016 00:41:01 +0200
Subject: 27-race-sbofind.t: use load() from Test::Sbotools

---
 t/27-race-sbofind.t | 19 ++-----------------
 1 file changed, 2 insertions(+), 17 deletions(-)

(limited to 't')

diff --git a/t/27-race-sbofind.t b/t/27-race-sbofind.t
index ba28a5e..001d5a7 100755
--- a/t/27-race-sbofind.t
+++ b/t/27-race-sbofind.t
@@ -6,6 +6,8 @@ use Test::More;
 use Test::Exit;
 use FindBin '$RealBin';
 use lib "$RealBin/../SBO-Lib/lib";
+use lib $RealBin;
+use Test::Sbotools 'load';
 use Capture::Tiny qw/ capture_merged /;
 use File::Temp 'tempdir';
 use Cwd;
@@ -13,23 +15,6 @@ use feature 'state';
 
 plan tests => 9;
 
-sub load {
-	my ($script, %opts) = @_;
-
-	local @ARGV = exists $opts{argv} ? @{ $opts{argv} } : '-h';
-	my ($ret, $exit, $out, $do_err);
-	my $eval = eval {
-		$out = capture_merged { $exit = exit_code {
-			$ret = do "$RealBin/../$script";
-			$do_err = $@;
-		}; };
-		1;
-	};
-	my $err = $@;
-
-	note explain { ret => $ret, exit => $exit, out => $out, eval => $eval, err => $err, do_err => $do_err } if $opts{explain};
-}
-
 load('sbofind');
 my $tags_file = '/usr/sbo/repo/TAGS.txt';
 
-- 
cgit v1.2.3