X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=p5sagit%2FEval-WithLexicals.git;a=blobdiff_plain;f=t%2Fhints.t;h=7040b4258cd67539b99c10d4fd258db5c57f169f;hp=8d30d786893a81a4acf2f177583a4d6bf6b6091d;hb=6c8bf56cd4942ec40e37a6db79d4bab121e1cff8;hpb=21496cf62aad43a37846bed5d517b663e5cd5915 diff --git a/t/hints.t b/t/hints.t index 8d30d78..7040b42 100644 --- a/t/hints.t +++ b/t/hints.t @@ -4,7 +4,7 @@ use Eval::WithLexicals; use lib 't/lib'; use strictures 1; -use get_strictures_hints qw($strictures_hints $strictures_warn); +use get_strictures_hints; my $eval = Eval::WithLexicals->with_plugins("HintPersistence")->new(prelude => ''); @@ -19,6 +19,7 @@ is_deeply( 'Lexical not stored' ); +my ($strictures_hints, $strictures_warn) = get_strictures_hints::hints(); $eval->eval('use strictures 1'); {