moved probe classes to ::Probe:: namespace
[scpubgit/System-Introspector.git] / t / libdirs-perl.t
index be60cdb..4e7ef2c 100644 (file)
@@ -2,18 +2,18 @@ use strictures 1;
 use Test::More;
 use FindBin;
 
-use System::Introspector::LibDirs::Perl;
+use System::Introspector::Probe::LibDirs::Perl;
 
 my $dir = "$FindBin::Bin/data/libdir/perl";
 
 no warnings 'redefine';
-*System::Introspector::LibDirs::Perl::_open_locate_libdirs_pipe = sub {
+*System::Introspector::Probe::LibDirs::Perl::_open_locate_libdirs_pipe = sub {
     my $output = "$dir/lib/perl5\n";
     open my $fh, '<', \$output;
     return $fh;
 };
 
-my $probe = System::Introspector::LibDirs::Perl->new(
+my $probe = System::Introspector::Probe::LibDirs::Perl->new(
     root => $dir,
 );
 my $data = $probe->gather;