diff options
| author | Chris 'BinGOs' Williams <chris@bingosnet.co.uk> | 2013-06-26 12:42:13 +0100 |
|---|---|---|
| committer | Chris 'BinGOs' Williams <chris@bingosnet.co.uk> | 2013-06-26 12:42:13 +0100 |
| commit | 96d38a9d05abd090d07d5fb192de46417ec18593 (patch) | |
| tree | 1e53d1b6aae5cb3b0703ab39cf662300b68df318 /cpan/Digest-SHA/lib | |
| parent | e9d9e6f3421bdff07e44686f40670118444f312e (diff) | |
| download | perl-96d38a9d05abd090d07d5fb192de46417ec18593.tar.gz | |
Update Digest-SHA to CPAN version 5.85
[DELTA]
5.85 Wed Jun 26 04:05:26 MST 2013
- workaround for repeated calls to shaclose (ref. Bug #86295)
-- need to explicitly reset internal pointer to NULL
ref. shaclose() in SHA.xs
- corrected typos in shasum script
-- ref. Bug #85430
Diffstat (limited to 'cpan/Digest-SHA/lib')
| -rw-r--r-- | cpan/Digest-SHA/lib/Digest/SHA.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/cpan/Digest-SHA/lib/Digest/SHA.pm b/cpan/Digest-SHA/lib/Digest/SHA.pm index ef5be0af59..9f94136da0 100644 --- a/cpan/Digest-SHA/lib/Digest/SHA.pm +++ b/cpan/Digest-SHA/lib/Digest/SHA.pm @@ -7,7 +7,7 @@ use vars qw($VERSION @ISA @EXPORT @EXPORT_OK); use Fcntl; use integer; -$VERSION = '5.84'; +$VERSION = '5.85'; require Exporter; require DynaLoader; @@ -62,7 +62,7 @@ sub new { sub DESTROY { my $self = shift; - shaclose($$self) if $$self; + if ($$self) { shaclose($$self); $$self = undef } } sub clone { |