[Orca-checkins] rev 212 - in trunk/orca: . packages packages/Digest-MD5-2.24 packages/Digest-MD5-2.24/t

blair at orcaware.com blair at orcaware.com
Mon Mar 10 09:18:40 PST 2003


Author: blair
Date: 2003-03-10 09:17:57 -0800 (Mon, 10 Mar 2003)
New Revision: 212

Added:
   trunk/orca/packages/Digest-MD5-2.24/
Removed:
   trunk/orca/packages/Digest-MD5-2.23/
Modified:
   trunk/orca/INSTALL
   trunk/orca/configure.in
   trunk/orca/packages/Digest-MD5-2.24/Changes
   trunk/orca/packages/Digest-MD5-2.24/MD5.pm
   trunk/orca/packages/Digest-MD5-2.24/MD5.xs
   trunk/orca/packages/Digest-MD5-2.24/t/files.t
Log:
Upgrade Digest::MD5 from 2.23 to 2.24 and require the new version for
Orca.

* INSTALL:
  Update all references to Digest::MD5's version number from 2.23 to
  2.24.

* configure.in:
  Bump Digest::MD5's version number to 2.24.

* packages/Digest-MD5-2.24:
  Renamed from packages/Digest-MD5-2.23.  Directory contents updated
  from Digest-MD5-2.24.tar.gz.


Modified: trunk/orca/configure.in
==============================================================================
--- trunk/orca/configure.in	(original)
+++ trunk/orca/configure.in	2003-03-10 09:18:20.000000000 -0800
@@ -33,8 +33,8 @@
 DATE_PARSE_VER=2.24
 DEVEL_DPROF_DIR=DProf-19990108
 DEVEL_DPROF_VER=19990108
-DIGEST_MD5_DIR=Digest-MD5-2.23
-DIGEST_MD5_VER=2.23
+DIGEST_MD5_DIR=Digest-MD5-2.24
+DIGEST_MD5_VER=2.24
 MATH_INTERVALSEARCH_DIR=Math-Interpolate-1.05
 MATH_INTERVALSEARCH_VER=1.05
 RRDTOOL_DIR=rrdtool-1.0.41

Modified: trunk/orca/INSTALL
==============================================================================
--- trunk/orca/INSTALL	(original)
+++ trunk/orca/INSTALL	2003-03-10 09:18:23.000000000 -0800
@@ -172,7 +172,7 @@
     Data::Dumper            >= 2.101       >= 2.101     2.101
     Date::Parse             Not required by Orca        2.24
     Devel::DProf            Not required by Orca        19990108
-    Digest::MD5             >= 2.23        >= 2.23      2.23
+    Digest::MD5             >= 2.24        >= 2.24      2.24
     Math::IntervalSearch    >= 1.05        >= 1.05      1.05
     RRDs                    >= 1.000411    >= 1.0.41    1.0.41
     Storable                >= 2.06        >= 2.06      2.06
@@ -226,10 +226,10 @@
 
     Digest::MD5
 
-      http://www.perl.com/CPAN/authors/id/G/GA/GAAS/Digest-MD5-2.23.tar.gz
+      http://www.perl.com/CPAN/authors/id/G/GA/GAAS/Digest-MD5-2.24.tar.gz
 
-      % gunzip -c Digest-MD5-2.23.tar.gz | tar xvf -
-      % cd Digest-MD5-2.23
+      % gunzip -c Digest-MD5-2.24.tar.gz | tar xvf -
+      % cd Digest-MD5-2.24
       % perl Makefile.PL
       % make
       % make test

Copied: Digest-MD5-2.24 (from rev 211, trunk/orca/packages/Digest-MD5-2.23)

Modified: trunk/orca/packages/Digest-MD5-2.24/MD5.pm
==============================================================================
--- trunk/orca/packages/Digest-MD5-2.23/MD5.pm	(original)
+++ trunk/orca/packages/Digest-MD5-2.24/MD5.pm	2003-03-10 09:18:23.000000000 -0800
@@ -3,7 +3,7 @@
 use strict;
 use vars qw($VERSION @ISA @EXPORT_OK);
 
-$VERSION = '2.23';  # $Date: 2003/01/19 04:42:15 $
+$VERSION = '2.24';  # $Date: 2003/03/09 15:23:10 $
 
 require Exporter;
 *import = \&Exporter::import;

Modified: trunk/orca/packages/Digest-MD5-2.24/t/files.t
==============================================================================
--- trunk/orca/packages/Digest-MD5-2.23/t/files.t	(original)
+++ trunk/orca/packages/Digest-MD5-2.24/t/files.t	2003-03-10 09:18:24.000000000 -0800
@@ -20,27 +20,27 @@
 my $EXPECT;
 if (ord "A" == 193) { # EBCDIC
     $EXPECT = <<EOT;
-aab6fda26844b46ca878f46394c52bb2  Changes
+4ee4091bda2bb74fb2416c2fdb0c4d4a  Changes
 0565ec21b15c0f23f4c51fb327c8926d  README
-5d2a638a7323f5bd5b5c120c9330b99d  MD5.pm
-d7fd24455b9160aa8706635d15e6177e  MD5.xs
+b00637894d2bd395ffda2fa84adefdfd  MD5.pm
+20cd22cecca8f24e807a76b9c0d575e3  MD5.xs
 276da0aa4e9a08b7fe09430c9c5690aa  rfc1321.txt
 EOT
 } elsif ("\n" eq "\015") { # MacOS
     $EXPECT = <<EOT;
-d286d6c6a61e44e88d1deba9954ce37a  Changes
+d7b1bf11283114d1b765f433a5d7b447  Changes
 6c950a0211a5a28f023bb482037698cd  README
-d31c9aefa1a9e40beda9fff1e1d9c02d  MD5.pm
-6bff95ff70ba43a6c81e255c6510a865  MD5.xs
+f854bd4984ad0e73c483a49a28893c74  MD5.pm
+e3a430cf5604b80dd642de5bcc1a8221  MD5.xs
 754b9db19f79dbc4992f7166eb0f37ce  rfc1321.txt
 EOT
 } else {
     # This is the output of: 'md5sum Changes README MD5.pm MD5.xs rfc1321.txt'
     $EXPECT = <<EOT;
-d286d6c6a61e44e88d1deba9954ce37a  Changes
+d7b1bf11283114d1b765f433a5d7b447  Changes
 6c950a0211a5a28f023bb482037698cd  README
-d31c9aefa1a9e40beda9fff1e1d9c02d  MD5.pm
-6bff95ff70ba43a6c81e255c6510a865  MD5.xs
+f854bd4984ad0e73c483a49a28893c74  MD5.pm
+e3a430cf5604b80dd642de5bcc1a8221  MD5.xs
 754b9db19f79dbc4992f7166eb0f37ce  rfc1321.txt
 EOT
 }
@@ -61,6 +61,7 @@
 for (split /^/, $EXPECT) {
      my($md5hex, $file) = split ' ';
      my $base = $file;
+#     print "# $base\n";
      if ($ENV{PERL_CORE}) {
          if ($file eq 'rfc1321.txt') { # Don't have it in core.
 	     print "ok ", ++$testno, " # Skip: PERL_CORE\n";

Modified: trunk/orca/packages/Digest-MD5-2.24/Changes
==============================================================================
--- trunk/orca/packages/Digest-MD5-2.23/Changes	(original)
+++ trunk/orca/packages/Digest-MD5-2.24/Changes	2003-03-10 09:18:24.000000000 -0800
@@ -1,3 +1,13 @@
+2003-03-09   Gisle Aas <gisle at ActiveState.com>
+
+   Release 2.24
+
+   Don't let the $^W test get confused by lexical warnings.
+
+   Sync up with bleadperl; safer patchlevel include.
+
+
+
 2003-01-18   Gisle Aas <gisle at ActiveState.com>
 
    Release 2.23

Modified: trunk/orca/packages/Digest-MD5-2.24/MD5.xs
==============================================================================
--- trunk/orca/packages/Digest-MD5-2.23/MD5.xs	(original)
+++ trunk/orca/packages/Digest-MD5-2.24/MD5.xs	2003-03-10 09:18:24.000000000 -0800
@@ -1,4 +1,4 @@
-/* $Id: MD5.xs,v 1.35 2003/01/05 00:54:17 gisle Exp $ */
+/* $Id: MD5.xs,v 1.37 2003/03/09 15:20:43 gisle Exp $ */
 
 /* 
  * This library is free software; you can redistribute it and/or
@@ -44,11 +44,23 @@
 }
 #endif
 
-#include "patchlevel.h"
+#ifndef PATCHLEVEL
+#    include <patchlevel.h>
+#    if !(defined(PERL_VERSION) || (SUBVERSION > 0 && defined(PATCHLEVEL)))
+#        include <could_not_find_Perl_patchlevel.h>
+#    endif
+#endif
+
 #if PATCHLEVEL <= 4 && !defined(PL_dowarn)
    #define PL_dowarn dowarn
 #endif
 
+#ifdef G_WARN_ON
+   #define DOWARN (PL_dowarn & G_WARN_ON)
+#else
+   #define DOWARN PL_dowarn
+#endif
+
 #ifdef SvPVbyte
    #if PERL_REVISION == 5 && PERL_VERSION < 7
        /* SvPVbyte does not work in perl-5.6.1, borrowed version for 5.7.3 */
@@ -658,7 +670,7 @@
     PPCODE:
 	MD5Init(&ctx);
 
-	if (PL_dowarn) {
+	if (DOWARN) {
             char *msg = 0;
 	    if (items == 1) {
 		if (SvROK(ST(0))) {



More information about the Orca-checkins mailing list