From: Graham Knop Date: Fri, 13 Jun 2014 11:07:49 +0000 (-0400) Subject: correct hints test when running in git checkout X-Git-Tag: v1.003000~10 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=2b376bd0dc102f9019e007d889a844f94b3a87b9;p=p5sagit%2FEval-WithLexicals.git correct hints test when running in git checkout --- diff --git a/t/hints.t b/t/hints.t index 62cecc8..f5681b3 100644 --- a/t/hints.t +++ b/t/hints.t @@ -1,7 +1,12 @@ -use strictures 1; -# Find the hint value that 'use strictures 1' sets on this perl. +use strictures (); my $strictures_hints; -BEGIN { $strictures_hints = $^H } +BEGIN { + local $ENV{PERL_STRICTURES_EXTRA} = 0; + strictures->VERSION(1); strictures->import(); + # Find the hint value that 'use strictures 1' sets on this perl. + $strictures_hints = $^H; +} +use strictures 1; use Test::More; use Eval::WithLexicals;