diff options
Diffstat (limited to 'ext/Storable/t/code.t')
| -rw-r--r-- | ext/Storable/t/code.t | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/ext/Storable/t/code.t b/ext/Storable/t/code.t index c8b2ca1b5d..b66cae7116 100644 --- a/ext/Storable/t/code.t +++ b/ext/Storable/t/code.t @@ -25,7 +25,7 @@ BEGIN { if (!eval q{ use Test; use B::Deparse 0.61; - use 5.6.0; + use 5.006; 1; }) { print "1..0 # skip: tests only work with B::Deparse 0.61 and at least perl 5.6.0\n"; @@ -55,6 +55,8 @@ $blessed_code = bless sub { "blessed" }, "Some::Package"; sub code { "JAPH" } } +local *FOO; + @obj = ([\&code, # code reference sub { 6*7 }, |