[svn:Module-Build] r12459 - in Module-Build/trunk: . t/lib

[dagolden]

Author: dagolden
Date: Sun Jan 25 05:22:38 2009
New Revision: 12459

Modified:
   Module-Build/trunk/   (props changed)
   Module-Build/trunk/t/lib/MBTest.pm

Log:
Improve ensure blib diagnostics


Modified: Module-Build/trunk/t/lib/MBTest.pm
==============================================================================
--- Module-Build/trunk/t/lib/MBTest.pm  (original)
+++ Module-Build/trunk/t/lib/MBTest.pm  Sun Jan 25 05:22:38 2009
@@ -212,7 +212,8 @@
   # Make sure the given module was loaded from blib/, not the larger system
   my $mod = shift;
   (my $path = $mod) =~ s{::}{/}g;
-  
+ 
+  local $Test::Builder::Level = $Test::Builder::Level + 1; 
  SKIP: {
     skip "no blib in core", 1 if $ENV{PERL_CORE};
     like $INC{"$path.pm"}, qr/\bblib\b/, "Make sure $mod was loaded from 
blib/";