From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Sat, 15 Feb 2003 08:39:38 +0000 (+0000)
Subject: Bring the CPAN Digest::MD5 (2.23) and the core Digest::MD5
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=77e6095e34c8cd9414ba30b5ca3a8bdb33481363;p=p5sagit%2Fp5-mst-13.2.git

Bring the CPAN Digest::MD5 (2.23) and the core Digest::MD5
even closer to each other.  The dec_osf.pl is irrelevant
for the current core but adding it makes for one less exception
when integrating.

p4raw-id: //depot/perl@18712
---

diff --git a/MANIFEST b/MANIFEST
index 64de081..b55d759 100644
--- a/MANIFEST
+++ b/MANIFEST
@@ -168,6 +168,7 @@ ext/Devel/PPPort/soak		Test Harness to run Devel::PPPort other Perls
 ext/Devel/PPPort/t/test.t	See if Devel::PPPort works
 ext/Devel/PPPort/TODO		Devel::PPPort Todo
 ext/Digest/MD5/Changes		Digest::MD5 extension changes
+ext/Digest/MD5/hints/dec_osf.pl	Hints for named architecture
 ext/Digest/MD5/hints/irix_6.pl	Hints for named architecture
 ext/Digest/MD5/hints/MacOS.pl	Hints for named architecture
 ext/Digest/MD5/Makefile.PL	Digest::MD5 extension makefile writer
diff --git a/ext/Digest/MD5/MD5.pm b/ext/Digest/MD5/MD5.pm
index 0017e5a..2236605 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.22';  # $Date: 2003/01/05 00:56:14 $
+$VERSION = '2.23';  # $Date: 2003/01/19 04:42:15 $
 
 require Exporter;
 *import = \&Exporter::import;
diff --git a/ext/Digest/MD5/Makefile.PL b/ext/Digest/MD5/Makefile.PL
index ceae949..1a91de0 100644
--- a/ext/Digest/MD5/Makefile.PL
+++ b/ext/Digest/MD5/Makefile.PL
@@ -15,6 +15,7 @@ if ($^O eq 'VMS') {
     }
 }
 
+push(@extra, 'INSTALLDIRS'  => 'perl') if $] >= 5.008;
 
 WriteMakefile(
     'NAME'	   => 'Digest::MD5',
diff --git a/ext/Digest/MD5/hints/dec_osf.pl b/ext/Digest/MD5/hints/dec_osf.pl
new file mode 100644
index 0000000..89eeaab
--- /dev/null
+++ b/ext/Digest/MD5/hints/dec_osf.pl
@@ -0,0 +1,13 @@
+if ($] < 5.00503 and !$Config{gccversion}) {
+  print "
+  Because of a bug with the DEC system C compiler, some tests in
+  t/rfc2202.t will be skipped.  These tests fail because the compiler
+  bug breaks Perl's 'x' operator for eight-bit characters.  The
+  Digest:: modules themselves work and should be safe to install
+  anyway.
+
+  Versions of Perl after 5.005_03 will contain a workaround for the
+  bug.
+
+";
+}
diff --git a/ext/Digest/MD5/t/files.t b/ext/Digest/MD5/t/files.t
index 761ec48..f133c22 100644
--- a/ext/Digest/MD5/t/files.t
+++ b/ext/Digest/MD5/t/files.t
@@ -22,7 +22,7 @@ if (ord "A" == 193) { # EBCDIC
     $EXPECT = <<EOT;
 aab6fda26844b46ca878f46394c52bb2  Changes
 0565ec21b15c0f23f4c51fb327c8926d  README
-0fcdd6d6e33b8772bd4b4832043035cd  MD5.pm
+5d2a638a7323f5bd5b5c120c9330b99d  MD5.pm
 de2c149900efee0fbb39ad87dea68a43  MD5.xs
 276da0aa4e9a08b7fe09430c9c5690aa  rfc1321.txt
 EOT
@@ -30,7 +30,7 @@ EOT
     $EXPECT = <<EOT;
 d286d6c6a61e44e88d1deba9954ce37a  Changes
 6c950a0211a5a28f023bb482037698cd  README
-4e1043f0a7a266416d8408d6fa96f454  MD5.pm
+d31c9aefa1a9e40beda9fff1e1d9c02d  MD5.pm
 df178436ead9d354d63089fa0e01af27  MD5.xs
 754b9db19f79dbc4992f7166eb0f37ce  rfc1321.txt
 EOT
@@ -39,7 +39,7 @@ EOT
     $EXPECT = <<EOT;
 d286d6c6a61e44e88d1deba9954ce37a  Changes
 6c950a0211a5a28f023bb482037698cd  README
-4e1043f0a7a266416d8408d6fa96f454  MD5.pm
+d31c9aefa1a9e40beda9fff1e1d9c02d  MD5.pm
 df178436ead9d354d63089fa0e01af27  MD5.xs
 754b9db19f79dbc4992f7166eb0f37ce  rfc1321.txt
 EOT