From: Peter Rabbitson <ribasushi@cpan.org>
Date: Wed, 21 Dec 2011 10:26:20 +0000 (+0100)
Subject: Add an envvar to make it easier to smoke the PP codepath
X-Git-Tag: 0.22~11
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=9bb3eaa29ca8582e3c9f86cbc7d9bfebf857282d;p=p5sagit%2Fnamespace-clean.git

Add an envvar to make it easier to smoke the PP codepath
Still use Devel::Hide for the actual testing, as to not mask breakage
of the B::H::EOS detector
---

diff --git a/lib/namespace/clean.pm b/lib/namespace/clean.pm
index 84d203e..fbcfeec 100644
--- a/lib/namespace/clean.pm
+++ b/lib/namespace/clean.pm
@@ -19,7 +19,7 @@ BEGIN {
   # when changing also change in Makefile.PL
   my $b_h_eos_req = '0.07';
 
-  if (eval {
+  if (! $ENV{NAMESPACE_CLEAN_USE_PP} and eval {
     require B::Hooks::EndOfScope;
     B::Hooks::EndOfScope->VERSION($b_h_eos_req);
     1