]> git.vpit.fr Git - perl/modules/Scope-Upper.git/commitdiff
Style nits
authorVincent Pit <vince@profvince.com>
Mon, 2 Sep 2013 10:34:59 +0000 (12:34 +0200)
committerVincent Pit <vince@profvince.com>
Mon, 2 Sep 2013 10:34:59 +0000 (12:34 +0200)
t/07-context_info.t

index 3c06ac4e3128ca93f161b916bb3b36a2b976968f..b32dba7670e39b963cad919597136f3fafa77b6c 100644 (file)
@@ -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;
  }