diff options
Diffstat (limited to 't/run.t')
-rwxr-xr-x | t/run.t | 6 |
1 files changed, 2 insertions, 4 deletions
@@ -6,11 +6,9 @@ use warnings; use IPC::Run qw/run/; use Test::More tests => 54; -use FindBin; +use FindBin qw/$Bin/; use File::Temp qw/tempdir/; -my $path = "$FindBin::Bin/"; - my ($out, $err); delete $ENV{RPM_BUILD_ROOT}; @@ -50,6 +48,6 @@ foreach my $prog qw/ sub run_prog { my ($prog, @args) = @_; - run (["$FindBin::Bin/$prog", @args], \my($in, $out, $err)); + run (["$Bin/../$prog", @args], \my($in, $out, $err)); return ($out, $err); } |