Change 20687 by [EMAIL PROTECTED] on 2003/08/13 18:53:15

        Alpha version numbers noticed by Schwern.
        (These hacks are no more needed since the PAUSE indexer no
         more indexes the insides of Perl distributions, says Andreas.)

Affected files ...

... //depot/perl/ext/Devel/DProf/DProf.pm#12 edit
... //depot/perl/ext/Devel/Peek/Peek.pm#19 edit
... //depot/perl/ext/IO/lib/IO/Dir.pm#10 edit
... //depot/perl/ext/IO/lib/IO/Handle.pm#30 edit
... //depot/perl/ext/IO/lib/IO/Seekable.pm#20 edit
... //depot/perl/ext/IO/lib/IO/Socket/UNIX.pm#9 edit
... //depot/perl/ext/IPC/SysV/Msg.pm#11 edit
... //depot/perl/ext/IPC/SysV/Semaphore.pm#12 edit
... //depot/perl/ext/IPC/SysV/SysV.pm#7 edit

Differences ...

==== //depot/perl/ext/Devel/DProf/DProf.pm#12 (text) ====
Index: perl/ext/Devel/DProf/DProf.pm
--- perl/ext/Devel/DProf/DProf.pm#11~20440~     Fri Aug  1 22:12:13 2003
+++ perl/ext/Devel/DProf/DProf.pm       Wed Aug 13 11:53:15 2003
@@ -205,9 +205,8 @@
 
 use XSLoader ();
 
-# Underscore to allow older Perls to access older version from CPAN
-$Devel::DProf::VERSION = '20030801.00_00';  # this version not authorized by
-                                    # Dean Roehrich. See "Changes" file.
+$Devel::DProf::VERSION = '20030813.00';  # this version not authorized by
+                                        # Dean Roehrich. See "Changes" file.
 
 XSLoader::load 'Devel::DProf', $Devel::DProf::VERSION;
 

==== //depot/perl/ext/Devel/Peek/Peek.pm#19 (text) ====
Index: perl/ext/Devel/Peek/Peek.pm
--- perl/ext/Devel/Peek/Peek.pm#18~16822~       Mon May 27 13:42:47 2002
+++ perl/ext/Devel/Peek/Peek.pm Wed Aug 13 11:53:15 2003
@@ -3,8 +3,7 @@
 
 package Devel::Peek;
 
-# Underscore to allow older Perls to access older version from CPAN
-$VERSION = '1.00_03';
+$VERSION = '1.01';
 $XS_VERSION = $VERSION;
 $VERSION = eval $VERSION;
 

==== //depot/perl/ext/IO/lib/IO/Dir.pm#10 (text) ====
Index: perl/ext/IO/lib/IO/Dir.pm
--- perl/ext/IO/lib/IO/Dir.pm#9~16822~  Mon May 27 13:42:47 2002
+++ perl/ext/IO/lib/IO/Dir.pm   Wed Aug 13 11:53:15 2003
@@ -19,7 +19,7 @@
 use File::Spec;
 
 @ISA = qw(Tie::Hash Exporter);
-$VERSION = "1.03_00";
+$VERSION = "1.04";
 $VERSION = eval $VERSION;
 @EXPORT_OK = qw(DIR_UNLINK);
 

==== //depot/perl/ext/IO/lib/IO/Handle.pm#30 (text) ====
Index: perl/ext/IO/lib/IO/Handle.pm
--- perl/ext/IO/lib/IO/Handle.pm#29~20686~      Wed Aug 13 11:42:50 2003
+++ perl/ext/IO/lib/IO/Handle.pm        Wed Aug 13 11:53:15 2003
@@ -1,4 +1,3 @@
-
 package IO::Handle;
 
 =head1 NAME
@@ -263,7 +262,7 @@
 require Exporter;
 @ISA = qw(Exporter);
 
-$VERSION = "1.22_00";
+$VERSION = "1.23";
 $VERSION = eval $VERSION;
 
 @EXPORT_OK = qw(

==== //depot/perl/ext/IO/lib/IO/Seekable.pm#20 (text) ====
Index: perl/ext/IO/lib/IO/Seekable.pm
--- perl/ext/IO/lib/IO/Seekable.pm#19~16822~    Mon May 27 13:42:47 2002
+++ perl/ext/IO/lib/IO/Seekable.pm      Wed Aug 13 11:53:15 2003
@@ -107,7 +107,7 @@
 @EXPORT = qw(SEEK_SET SEEK_CUR SEEK_END);
 @ISA = qw(Exporter);
 
-$VERSION = "1.08_00";
+$VERSION = "1.09";
 $VERSION = eval $VERSION;
 
 sub seek {

==== //depot/perl/ext/IO/lib/IO/Socket/UNIX.pm#9 (text) ====
Index: perl/ext/IO/lib/IO/Socket/UNIX.pm
--- perl/ext/IO/lib/IO/Socket/UNIX.pm#8~16822~  Mon May 27 13:42:47 2002
+++ perl/ext/IO/lib/IO/Socket/UNIX.pm   Wed Aug 13 11:53:15 2003
@@ -13,7 +13,7 @@
 use Carp;
 
 @ISA = qw(IO::Socket);
-$VERSION = "1.20_00";
+$VERSION = "1.21";
 $VERSION = eval $VERSION;
 
 IO::Socket::UNIX->register_domain( AF_UNIX );

==== //depot/perl/ext/IPC/SysV/Msg.pm#11 (text) ====
Index: perl/ext/IPC/SysV/Msg.pm
--- perl/ext/IPC/SysV/Msg.pm#10~20686~  Wed Aug 13 11:42:50 2003
+++ perl/ext/IPC/SysV/Msg.pm    Wed Aug 13 11:53:15 2003
@@ -11,7 +11,7 @@
 use vars qw($VERSION);
 use Carp;
 
-$VERSION = "1.01_00";
+$VERSION = "1.02";
 $VERSION = eval $VERSION;
 
 {

==== //depot/perl/ext/IPC/SysV/Semaphore.pm#12 (text) ====
Index: perl/ext/IPC/SysV/Semaphore.pm
--- perl/ext/IPC/SysV/Semaphore.pm#11~20686~    Wed Aug 13 11:42:50 2003
+++ perl/ext/IPC/SysV/Semaphore.pm      Wed Aug 13 11:53:15 2003
@@ -12,7 +12,7 @@
 use vars qw($VERSION);
 use Carp;
 
-$VERSION = "1.01_00";
+$VERSION = "1.02";
 $VERSION = eval $VERSION;
 
 {

==== //depot/perl/ext/IPC/SysV/SysV.pm#7 (text) ====
Index: perl/ext/IPC/SysV/SysV.pm
--- perl/ext/IPC/SysV/SysV.pm#6~16822~  Mon May 27 13:42:47 2002
+++ perl/ext/IPC/SysV/SysV.pm   Wed Aug 13 11:53:15 2003
@@ -14,7 +14,7 @@
 require Exporter;
 @ISA = qw(Exporter);
 
-$VERSION = "1.03_00";
+$VERSION = "1.04";
 $XS_VERSION = $VERSION;
 $VERSION = eval $VERSION;
 
End of Patch.

Reply via email to