| Subject: | [PATCH] Use Digest::SHA instead of Digest::SHA1 |
| Date: | Sat, 31 Jul 2010 20:33:02 +0900 |
| To: | bug-Crypt-MySQL [...] rt.cpan.org |
| From: | Ansgar Burchardt <ANSGAR [...] cpan.org> |
Hi,
the attached patch changes Crypt::MySQL to use the Digest::SHA module
instead of Digest::SHA1. Digest::SHA is part of the standard perl
distribution since perl v5.9.3 so this reduces the number of external
dependencies by one.
Please consider applying it for the next release.
Regards,
Ansgar
only in patch2:
unchanged:
--- libcrypt-mysql-perl-0.04.orig/Makefile.PL
+++ libcrypt-mysql-perl-0.04/Makefile.PL
@@ -11,7 +11,7 @@
PL_FILES => {},
PREREQ_PM => {
'Test::More' => 0,
- 'Digest::SHA1' => 0,
+ 'Digest::SHA' => 0,
},
dist => { COMPRESS => 'gzip -9f', SUFFIX => 'gz', },
clean => { FILES => 'Crypt-MySQL-*' },
only in patch2:
unchanged:
--- libcrypt-mysql-perl-0.04.orig/Build.PL
+++ libcrypt-mysql-perl-0.04/Build.PL
@@ -9,7 +9,7 @@
dist_version_from => 'lib/Crypt/MySQL.pm',
requires => {
'Test::More' => 0,
- 'Digest::SHA1' => 0,
+ 'Digest::SHA' => 0,
},
add_to_cleanup => [ 'Crypt-MySQL-*' ],
);
only in patch2:
unchanged:
--- libcrypt-mysql-perl-0.04.orig/lib/Crypt/MySQL.pm
+++ libcrypt-mysql-perl-0.04/lib/Crypt/MySQL.pm
@@ -2,7 +2,7 @@
use strict;
use vars qw($VERSION @ISA @EXPORT_OK);
-use Digest::SHA1 qw(sha1 sha1_hex);
+use Digest::SHA qw(sha1 sha1_hex);
BEGIN {
$VERSION = '0.04';
@@ -50,6 +50,6 @@
=head1 SEE ALSO
-L<DBD::mysql> L<Digest::SHA1>
+L<DBD::mysql> L<Digest::SHA>
=cut