From: Vincent Pit Date: Tue, 18 May 2010 19:46:41 +0000 (+0200) Subject: Skip two pairs of tests in t/20-localize-target.t with perl 5.8.0 X-Git-Tag: v0.12~8 X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FScope-Upper.git;a=commitdiff_plain;h=8d81fa027a6a701f6b8a4e96dc04a36a09295210 Skip two pairs of tests in t/20-localize-target.t with perl 5.8.0 We can't actually localize through a reference before 5.8.1. --- diff --git a/t/20-localize-target.t b/t/20-localize-target.t index 136feb6..9bd7a38 100644 --- a/t/20-localize-target.t +++ b/t/20-localize-target.t @@ -66,7 +66,7 @@ undef *x; SKIP: { - skip 'Can\'t localize through a reference in 5.6' => 2 if $] < 5.008; + skip 'Can\'t localize through a reference before 5.8.1' => 2 if $] < 5.008001; eval q{ no strict 'refs'; local ${''} = 9; @@ -80,7 +80,7 @@ SKIP: SKIP: { - skip 'Can\'t localize through a reference in 5.6' => 2 if $] < 5.008; + skip 'Can\'t localize through a reference before 5.8.1' => 2 if $] < 5.008001; eval q{ no strict 'refs'; local ${''} = 10;