Change 28714 by [EMAIL PROTECTED] on 2006/08/14 19:43:23

        Upgrade to Devel::PPPort 3.10

Affected files ...

... //depot/perl/ext/Devel/PPPort/Changes#31 edit
... //depot/perl/ext/Devel/PPPort/PPPort_pm.PL#24 edit
... //depot/perl/ext/Devel/PPPort/soak#19 edit

Differences ...

==== //depot/perl/ext/Devel/PPPort/Changes#31 (xtext) ====
Index: perl/ext/Devel/PPPort/Changes
--- perl/ext/Devel/PPPort/Changes#30~28616~     2006-07-25 11:54:08.000000000 
-0700
+++ perl/ext/Devel/PPPort/Changes       2006-08-14 12:43:23.000000000 -0700
@@ -1,3 +1,7 @@
+3.10 - 2006-08-14
+
+    * remove timestamp from generated ppport.h
+
 3.09_02 - 2006-07-25
 
     * added support for the following API

==== //depot/perl/ext/Devel/PPPort/PPPort_pm.PL#24 (text) ====
Index: perl/ext/Devel/PPPort/PPPort_pm.PL
--- perl/ext/Devel/PPPort/PPPort_pm.PL#23~28616~        2006-07-25 
11:54:08.000000000 -0700
+++ perl/ext/Devel/PPPort/PPPort_pm.PL  2006-08-14 12:43:23.000000000 -0700
@@ -4,9 +4,9 @@
 #
 
################################################################################
 #
-#  $Revision: 48 $
+#  $Revision: 49 $
 #  $Author: mhx $
-#  $Date: 2006/07/24 21:03:14 +0200 $
+#  $Date: 2006/08/14 21:26:31 +0200 $
 #
 
################################################################################
 #
@@ -335,9 +335,9 @@
 #
 
################################################################################
 #
-#  $Revision: 48 $
+#  $Revision: 49 $
 #  $Author: mhx $
-#  $Date: 2006/07/24 21:03:14 +0200 $
+#  $Date: 2006/08/14 21:26:31 +0200 $
 #
 
################################################################################
 #
@@ -498,16 +498,14 @@
 use strict;
 use vars qw($VERSION $data);
 
-$VERSION = do { my @r = '$Snapshot: /Devel-PPPort/3.09_02 $' =~ 
/(\d+\.\d+(?:_\d+)?)/; @r ? $r[0] : '9.99' };
+$VERSION = do { my @r = '$Snapshot: /Devel-PPPort/3.10 $' =~ 
/(\d+\.\d+(?:_\d+)?)/; @r ? $r[0] : '9.99' };
 
 sub _init_data
 {
   $data = do { local $/; <DATA> };
-  my $now = localtime;
   my $pkg = 'Devel::PPPort';
   $data =~ s/__PERL_VERSION__/$]/g;
   $data =~ s/__VERSION__/$VERSION/g;
-  $data =~ s/__DATE__/$now/g;
   $data =~ s/__PKG__/$pkg/g;
   $data =~ s/^\|>//gm;
 }
@@ -537,8 +535,7 @@
 
     ppport.h -- Perl/Pollution/Portability Version __VERSION__
 
-    Automatically created by __PKG__ running under
-    perl __PERL_VERSION__ on __DATE__.
+    Automatically created by __PKG__ running under perl __PERL_VERSION__.
 
     Do NOT edit this file directly! -- Edit PPPort_pm.PL and the
     includes in parts/inc/ instead.

==== //depot/perl/ext/Devel/PPPort/soak#19 (text) ====
Index: perl/ext/Devel/PPPort/soak
--- perl/ext/Devel/PPPort/soak#18~28616~        2006-07-25 11:54:08.000000000 
-0700
+++ perl/ext/Devel/PPPort/soak  2006-08-14 12:43:23.000000000 -0700
@@ -33,7 +33,7 @@
 use List::Util qw(max);
 use Config;
 
-my $VERSION = do { my @r = '$Snapshot: /Devel-PPPort/3.09_02 $' =~ 
/(\d+\.\d+(?:_\d+)?)/; @r ? $r[0] : '9.99' };
+my $VERSION = do { my @r = '$Snapshot: /Devel-PPPort/3.10 $' =~ 
/(\d+\.\d+(?:_\d+)?)/; @r ? $r[0] : '9.99' };
 
 $| = 1;
 my %OPT = (
End of Patch.

Reply via email to