From: Vincent Pit Date: Mon, 2 Sep 2013 10:34:59 +0000 (+0200) Subject: Style nits X-Git-Tag: v0.23~1 X-Git-Url: http://git.vpit.fr/?a=commitdiff_plain;h=b28b51b004d8c91c31c1832655c09d9d0469f813;p=perl%2Fmodules%2FScope-Upper.git Style nits --- diff --git a/t/07-context_info.t b/t/07-context_info.t index 3c06ac4..b32dba7 100644 --- a/t/07-context_info.t +++ b/t/07-context_info.t @@ -47,7 +47,7 @@ sub expected { if ($top) { $want = "$]" < 5.015_001 ? '' : undef; $hints &= ~HINT_BLOCK_SCOPE if $Config{usesitecustomize}; - $hints |= HINT_BLOCK_SCOPE if $] >= 5.019003; + $hints |= HINT_BLOCK_SCOPE if "$]" >= 5.019003; $warnings = sub { use warnings; (caller 0)[9] }->() if "$]" < 5.007 and not $^W; }