From 0c8767aeceb5f1c68d6318e2c8809e9913930642 Mon Sep 17 00:00:00 2001 From: Gisle Aas Date: Wed, 12 Nov 2008 09:40:43 +0000 Subject: [PATCH] Sync up with Digest-MD5-2.37 from CPAN p4raw-id: //depot/perl@34818 --- ext/Digest/MD5/Changes | 8 ++++++++ ext/Digest/MD5/MD5.pm | 4 ++-- ext/Digest/MD5/MD5.xs | 2 -- ext/Digest/MD5/t/files.t | 18 +++++++++--------- 4 files changed, 19 insertions(+), 13 deletions(-) diff --git a/ext/Digest/MD5/Changes b/ext/Digest/MD5/Changes index ce6b699..c4d7d1f 100644 --- a/ext/Digest/MD5/Changes +++ b/ext/Digest/MD5/Changes @@ -1,3 +1,11 @@ +2008-11-12 Gisle Aas + + Release 2.37 + + Sync up with consting changes from the perl core. + + + 2005-11-30 Gisle Aas Release 2.36 diff --git a/ext/Digest/MD5/MD5.pm b/ext/Digest/MD5/MD5.pm index e9ff18e..32fc1aa 100644 --- a/ext/Digest/MD5/MD5.pm +++ b/ext/Digest/MD5/MD5.pm @@ -3,7 +3,7 @@ package Digest::MD5; use strict; use vars qw($VERSION @ISA @EXPORT_OK); -$VERSION = '2.36_01'; # $Date: 2005/11/30 13:46:47 $ +$VERSION = '2.37'; require Exporter; *import = \&Exporter::import; @@ -310,7 +310,7 @@ string through encode_utf8() function: L, L, -L, +L, L L diff --git a/ext/Digest/MD5/MD5.xs b/ext/Digest/MD5/MD5.xs index 1075774..9f3689d 100644 --- a/ext/Digest/MD5/MD5.xs +++ b/ext/Digest/MD5/MD5.xs @@ -1,5 +1,3 @@ -/* $Id: MD5.xs,v 1.45 2005/11/26 11:06:20 gisle Exp $ */ - /* * This library is free software; you can redistribute it and/or * modify it under the same terms as Perl itself. diff --git a/ext/Digest/MD5/t/files.t b/ext/Digest/MD5/t/files.t index 5086c55..4c41b32 100644 --- a/ext/Digest/MD5/t/files.t +++ b/ext/Digest/MD5/t/files.t @@ -20,27 +20,27 @@ use Digest::MD5 qw(md5 md5_hex md5_base64); my $EXPECT; if (ord "A" == 193) { # EBCDIC $EXPECT = <