[SCM] Debian packaging of liblwp-authen-wsse-perl branch, master, updated. debian/0.05-2-9-g075c503
Salvatore Bonaccorso
carnil at debian.org
Tue Nov 27 22:11:52 UTC 2012
The following commit has been merged in the master branch:
commit 6eed5841e15de559e5d571584bd95902a201a7a1
Author: Salvatore Bonaccorso <carnil at debian.org>
Date: Tue Nov 27 17:36:57 2012 +0100
Use Digest::SHA instead of Digest::SHA1
libdigest-sha1-perl package was reoved from Debian. Digest::SHA is part
of Perl core modules included with the perl interpreter since 5.10.
Thanks: Ansgar Burchardt <ansgar at debian.org>
Closes: #694486
diff --git a/META.yml b/META.yml
index c42a82d..c492bda 100644
--- a/META.yml
+++ b/META.yml
@@ -9,7 +9,7 @@ no_index:
- inc
- t
requires:
- Digest::SHA1: 0
+ Digest::SHA: 0
LWP: 0
MIME::Base64: 0
perl: 5.004
diff --git a/Makefile.PL b/Makefile.PL
index b51b7f1..a867d2c 100644
--- a/Makefile.PL
+++ b/Makefile.PL
@@ -6,7 +6,7 @@ author 'Audrey Tang <audrey at audrey.org>';
all_from 'lib/LWP/Authen/Wsse.pm';
requires 'LWP';
-requires 'Digest::SHA1';
+requires 'Digest::SHA';
requires 'MIME::Base64';
sign;
diff --git a/lib/LWP/Authen/Wsse.pm b/lib/LWP/Authen/Wsse.pm
index a5d9046..bb26283 100644
--- a/lib/LWP/Authen/Wsse.pm
+++ b/lib/LWP/Authen/Wsse.pm
@@ -6,7 +6,7 @@ use English qw( -no_match_vars );
$LWP::Authen::Wsse::VERSION = '0.05';
-use Digest::SHA1 ();
+use Digest::SHA ();
use MIME::Base64 ();
=head1 NAME
@@ -75,7 +75,7 @@ sub authenticate {
my $nonce = $class->make_nonce;
my $nonce_enc = MIME::Base64::encode_base64( $nonce, WITHOUT_LINEBREAK );
my $digest = MIME::Base64::encode_base64(
- Digest::SHA1::sha1( $nonce . $now . $pass ), WITHOUT_LINEBREAK
+ Digest::SHA::sha1( $nonce . $now . $pass ), WITHOUT_LINEBREAK
);
my $auth_header = ( $proxy ? 'Proxy-Authorization' : 'Authorization' );
@@ -114,7 +114,7 @@ sub authenticate {
}
sub make_nonce {
- Digest::SHA1::sha1( time() . {} . rand() . $PID );
+ Digest::SHA::sha1( time() . {} . rand() . $PID );
}
sub now_w3cdtf {
--
Debian packaging of liblwp-authen-wsse-perl
More information about the Pkg-perl-cvs-commits
mailing list