From: Robert 'phaylon' Sedlacek <r.sedlacek@shadowcat.co.uk>
Date: Wed, 11 Jul 2012 17:08:31 +0000 (+0000)
Subject: use test data for Perls probe
X-Git-Tag: v0.001_001~29
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=cdde15e16c31fc845fdda32611b41b93a4ad8af9;p=scpubgit%2FSystem-Introspector.git

use test data for Perls probe
---

diff --git a/t/perls.t b/t/perls.t
index f04348b..2df77f9 100644
--- a/t/perls.t
+++ b/t/perls.t
@@ -6,13 +6,13 @@ use System::Introspector::Probe::Perls;
 
 do {
     no warnings 'redefine';
-#    *System::Introspector::Probe::Perls::_find_possible_perl_configs = sub {
-#        map "$FindBin::Bin/data/perls/$_/lib/Config.pm", '5.10.0', '5.14.2',
-#    };
+    *System::Introspector::Probe::Perls::_find_possible_perl_configs = sub {
+        map "$FindBin::Bin/data/perls/$_/lib/Config.pm", '5.10.0', '5.14.2',
+    };
 };
 
 my $probe = System::Introspector::Probe::Perls->new(
-#    root => "$FindBin::Bin/data/perls",
+    root => "$FindBin::Bin/data/perls",
 );
 
 my $result = $probe->gather;