diff options
| author | Chris 'BinGOs' Williams <chris@bingosnet.co.uk> | 2012-06-08 13:20:11 +0100 |
|---|---|---|
| committer | Chris 'BinGOs' Williams <chris@bingosnet.co.uk> | 2012-06-17 21:26:49 +0100 |
| commit | 5df103ab73b6ab42851b6d0eef6e18aa79ff938b (patch) | |
| tree | 4f9c30338742547436ffdc4de3fbe1edeb92daf8 /dist/Safe/Safe.pm | |
| parent | 0b0a70928cebc63fc7992e87b186c34da5921ae0 (diff) | |
| download | perl-5df103ab73b6ab42851b6d0eef6e18aa79ff938b.tar.gz | |
Updated Safe to CPAN release 2.33
[DELTA]
2.33 Tue Apr 3 2012
- Don't eval code under 'no strict' (Father Chrysostomos)
2.32 Sat Mar 31 2012
- Make Safe play nice with Devel::Cover
Diffstat (limited to 'dist/Safe/Safe.pm')
| -rw-r--r-- | dist/Safe/Safe.pm | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/dist/Safe/Safe.pm b/dist/Safe/Safe.pm index a5cc238cba..865a9dce60 100644 --- a/dist/Safe/Safe.pm +++ b/dist/Safe/Safe.pm @@ -3,7 +3,7 @@ package Safe; use 5.003_11; use Scalar::Util qw(reftype refaddr); -$Safe::VERSION = "2.31_01"; +$Safe::VERSION = "2.33_01"; # *** Don't declare any lexicals above this point *** # @@ -140,6 +140,9 @@ my $default_share = [qw[ &Tie::Hash::NamedCapture::SCALAR &Tie::Hash::NamedCapture::flags ])]; +if (defined $Devel::Cover::VERSION) { + push @$default_share, '&Devel::Cover::use_file'; +} sub new { my($class, $root, $mask) = @_; |