diff options
author | Chris 'BinGOs' Williams <chris@bingosnet.co.uk> | 2021-10-07 15:44:53 +0100 |
---|---|---|
committer | Chris 'BinGOs' Williams <chris@bingosnet.co.uk> | 2021-10-07 15:44:53 +0100 |
commit | 14956bc72e4dd8b178ec6986aa9857828f53e733 (patch) | |
tree | 5ef85ef8f1024c85016b6fffa644bf8e310e8300 /cpan | |
parent | 067ce62637d212ab1bfd22e0727ef29cfdf7b8a3 (diff) | |
download | perl-14956bc72e4dd8b178ec6986aa9857828f53e733.tar.gz |
Update Digest to CPAN version 1.20
[DELTA]
1.20 Tue 2021-08-24
- Remove temp files during unit tests.
Diffstat (limited to 'cpan')
-rw-r--r-- | cpan/Digest/lib/Digest.pm | 2 | ||||
-rw-r--r-- | cpan/Digest/lib/Digest/base.pm | 2 | ||||
-rw-r--r-- | cpan/Digest/lib/Digest/file.pm | 2 | ||||
-rw-r--r-- | cpan/Digest/t/base.t | 2 | ||||
-rw-r--r-- | cpan/Digest/t/file.t | 2 |
5 files changed, 5 insertions, 5 deletions
diff --git a/cpan/Digest/lib/Digest.pm b/cpan/Digest/lib/Digest.pm index 97f55d048a..b62ef64d85 100644 --- a/cpan/Digest/lib/Digest.pm +++ b/cpan/Digest/lib/Digest.pm @@ -3,7 +3,7 @@ package Digest; use strict; use warnings; -our $VERSION = "1.19"; +our $VERSION = "1.20"; our %MMAP = ( "SHA-1" => [ [ "Digest::SHA", 1 ], "Digest::SHA1", [ "Digest::SHA2", 1 ] ], diff --git a/cpan/Digest/lib/Digest/base.pm b/cpan/Digest/lib/Digest/base.pm index 0f3afcbda9..539559b261 100644 --- a/cpan/Digest/lib/Digest/base.pm +++ b/cpan/Digest/lib/Digest/base.pm @@ -3,7 +3,7 @@ package Digest::base; use strict; use warnings; -our $VERSION = "1.19"; +our $VERSION = "1.20"; # subclass is supposed to implement at least these sub new; diff --git a/cpan/Digest/lib/Digest/file.pm b/cpan/Digest/lib/Digest/file.pm index 7d46938c0c..088fabf4b9 100644 --- a/cpan/Digest/lib/Digest/file.pm +++ b/cpan/Digest/lib/Digest/file.pm @@ -7,7 +7,7 @@ use Exporter (); use Carp qw(croak); use Digest (); -our $VERSION = "1.19"; +our $VERSION = "1.20"; our @ISA = qw(Exporter); our @EXPORT_OK = qw(digest_file_ctx digest_file digest_file_hex digest_file_base64); diff --git a/cpan/Digest/t/base.t b/cpan/Digest/t/base.t index dca4d5aeb8..153d4d45ed 100644 --- a/cpan/Digest/t/base.t +++ b/cpan/Digest/t/base.t @@ -60,7 +60,7 @@ $ctx->add("foo"); is( $ctx->b64digest, $EBCDIC ? "hvDw8PM" : "ZjAwMDM" ); { - my ( $fh, $tempfile ) = tempfile(); + my ( $fh, $tempfile ) = tempfile( UNLINK => 1 ); binmode($fh); print $fh "abc" x 100, "\n"; close($fh) || die; diff --git a/cpan/Digest/t/file.t b/cpan/Digest/t/file.t index 20f1ec5d24..48ef39de72 100644 --- a/cpan/Digest/t/file.t +++ b/cpan/Digest/t/file.t @@ -35,7 +35,7 @@ use File::Temp 'tempfile'; use Digest::file qw(digest_file digest_file_hex digest_file_base64); { - my ( $fh, $file ) = tempfile(); + my ( $fh, $file ) = tempfile( UNLINK => 1 ); binmode($fh); print $fh "foo\0\n"; close($fh) || die "Can't write '$file': $!"; |