From 0493892a1e866c4357556737a3b805a458a7bbdf Mon Sep 17 00:00:00 2001 From: Guillaume Rousse Date: Fri, 1 Jan 2010 22:50:40 +0000 Subject: fix path to executables --- t/run.t | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) diff --git a/t/run.t b/t/run.t index 8df717a..7dfed7d 100755 --- a/t/run.t +++ b/t/run.t @@ -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); } -- cgit v1.2.1