From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Wed, 13 Aug 2003 18:53:15 +0000 (+0000)
Subject: Alpha version numbers noticed by Schwern.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=e9d8cdc0682791dad6e1ddeac96716205beff833;p=p5sagit%2Fp5-mst-13.2.git

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.)

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

diff --git a/ext/Devel/DProf/DProf.pm b/ext/Devel/DProf/DProf.pm
index 1a22b75..247b664 100644
--- a/ext/Devel/DProf/DProf.pm
+++ b/ext/Devel/DProf/DProf.pm
@@ -205,9 +205,8 @@ sub DB {
 
 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;
 
diff --git a/ext/Devel/Peek/Peek.pm b/ext/Devel/Peek/Peek.pm
index 37e01a4..4bd2dd9 100644
--- a/ext/Devel/Peek/Peek.pm
+++ b/ext/Devel/Peek/Peek.pm
@@ -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;
 
diff --git a/ext/IO/lib/IO/Dir.pm b/ext/IO/lib/IO/Dir.pm
index ccae4f0..de736cc 100644
--- a/ext/IO/lib/IO/Dir.pm
+++ b/ext/IO/lib/IO/Dir.pm
@@ -19,7 +19,7 @@ use File::stat;
 use File::Spec;
 
 @ISA = qw(Tie::Hash Exporter);
-$VERSION = "1.03_00";
+$VERSION = "1.04";
 $VERSION = eval $VERSION;
 @EXPORT_OK = qw(DIR_UNLINK);
 
diff --git a/ext/IO/lib/IO/Handle.pm b/ext/IO/lib/IO/Handle.pm
index 465ea6c..50d391f 100644
--- a/ext/IO/lib/IO/Handle.pm
+++ b/ext/IO/lib/IO/Handle.pm
@@ -1,4 +1,3 @@
-
 package IO::Handle;
 
 =head1 NAME
@@ -263,7 +262,7 @@ use IO ();	# Load the XS module
 require Exporter;
 @ISA = qw(Exporter);
 
-$VERSION = "1.22_00";
+$VERSION = "1.23";
 $VERSION = eval $VERSION;
 
 @EXPORT_OK = qw(
diff --git a/ext/IO/lib/IO/Seekable.pm b/ext/IO/lib/IO/Seekable.pm
index 2ddee4d..240b288 100644
--- a/ext/IO/lib/IO/Seekable.pm
+++ b/ext/IO/lib/IO/Seekable.pm
@@ -107,7 +107,7 @@ require Exporter;
 @EXPORT = qw(SEEK_SET SEEK_CUR SEEK_END);
 @ISA = qw(Exporter);
 
-$VERSION = "1.08_00";
+$VERSION = "1.09";
 $VERSION = eval $VERSION;
 
 sub seek {
diff --git a/ext/IO/lib/IO/Socket/UNIX.pm b/ext/IO/lib/IO/Socket/UNIX.pm
index bbc2a44..6d0e95a 100644
--- a/ext/IO/lib/IO/Socket/UNIX.pm
+++ b/ext/IO/lib/IO/Socket/UNIX.pm
@@ -13,7 +13,7 @@ use Socket;
 use Carp;
 
 @ISA = qw(IO::Socket);
-$VERSION = "1.20_00";
+$VERSION = "1.21";
 $VERSION = eval $VERSION;
 
 IO::Socket::UNIX->register_domain( AF_UNIX );
diff --git a/ext/IPC/SysV/Msg.pm b/ext/IPC/SysV/Msg.pm
index 88d7b34..fadd38f 100644
--- a/ext/IPC/SysV/Msg.pm
+++ b/ext/IPC/SysV/Msg.pm
@@ -11,7 +11,7 @@ use strict;
 use vars qw($VERSION);
 use Carp;
 
-$VERSION = "1.01_00";
+$VERSION = "1.02";
 $VERSION = eval $VERSION;
 
 {
diff --git a/ext/IPC/SysV/Semaphore.pm b/ext/IPC/SysV/Semaphore.pm
index b17664f..94ccf91 100644
--- a/ext/IPC/SysV/Semaphore.pm
+++ b/ext/IPC/SysV/Semaphore.pm
@@ -12,7 +12,7 @@ use strict;
 use vars qw($VERSION);
 use Carp;
 
-$VERSION = "1.01_00";
+$VERSION = "1.02";
 $VERSION = eval $VERSION;
 
 {
diff --git a/ext/IPC/SysV/SysV.pm b/ext/IPC/SysV/SysV.pm
index d4c51af..7645ced 100644
--- a/ext/IPC/SysV/SysV.pm
+++ b/ext/IPC/SysV/SysV.pm
@@ -14,7 +14,7 @@ use Config;
 require Exporter;
 @ISA = qw(Exporter);
 
-$VERSION = "1.03_00";
+$VERSION = "1.04";
 $XS_VERSION = $VERSION;
 $VERSION = eval $VERSION;