summaryrefslogtreecommitdiff
path: root/Master/tlpkg/tlperl/lib/version
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2012-11-20 18:08:54 +0000
committerKarl Berry <karl@freefriends.org>2012-11-20 18:08:54 +0000
commitc5add2ea5067382269ae6f19e345fda0b9a7bd21 (patch)
tree02f512fda46d93079c9dc59c0d76f0e398150f83 /Master/tlpkg/tlperl/lib/version
parent6c35e87bdc5a3f64833dbbc42e7d42e683db9d5b (diff)
perl 5.16.2, compiled without optimization for Windows (from siep)
git-svn-id: svn://tug.org/texlive/trunk@28315 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/tlperl/lib/version')
-rw-r--r--Master/tlpkg/tlperl/lib/version/Internals.pod34
-rw-r--r--Master/tlpkg/tlperl/lib/version/Requirements.pm21
2 files changed, 28 insertions, 27 deletions
diff --git a/Master/tlpkg/tlperl/lib/version/Internals.pod b/Master/tlpkg/tlperl/lib/version/Internals.pod
index 7cf4dc67693..ff63eba6af0 100644
--- a/Master/tlpkg/tlperl/lib/version/Internals.pod
+++ b/Master/tlpkg/tlperl/lib/version/Internals.pod
@@ -6,7 +6,7 @@ version::Internals - Perl extension for Version Objects
Overloaded version objects for all modern versions of Perl. This documents
the internal data representation and underlying code for version.pm. See
-L<version.pod> for daily usage. This document is only useful for users
+F<version.pod> for daily usage. This document is only useful for users
interested in the gory details.
=head1 WHAT IS A VERSION?
@@ -104,8 +104,8 @@ In general, Dotted-Decimal Versions permit the greatest amount of freedom
to specify a version, whereas Decimal Versions enforce a certain
uniformity.
-Just like L<Decimal Versions>, Dotted-Decimal Versions can be used as
-L<Alpha Versions>.
+Just like L</Decimal Versions>, Dotted-Decimal Versions can be used as
+L</Alpha Versions>.
=head2 Alpha Versions
@@ -244,8 +244,8 @@ helpful:
Because of the nature of the Perl parsing and tokenizing routines,
certain initialization values B<must> be quoted in order to correctly
-parse as the intended version, especially when using the L<declare> or
-L<qv> methods. While you do not have to quote decimal numbers when
+parse as the intended version, especially when using the C<declare> or
+L</qv()> methods. While you do not have to quote decimal numbers when
creating version objects, it is always safe to quote B<all> initial values
when using version.pm methods, as this will ensure that what you type is
what is used.
@@ -338,12 +338,12 @@ B<STRONGLY> discouraged, in that it will confuse you and your users.
=item qv
A boolean that denotes whether this is a decimal or dotted-decimal version.
-See L<is_qv>.
+See L<version/is_qv()>.
=item alpha
A boolean that denotes whether this is an alpha version. NOTE: that the
-underscore can can only appear in the last position. See L<is_alpha>.
+underscore can can only appear in the last position. See L<version/is_alpha()>.
=item version
@@ -397,7 +397,7 @@ The replacement UNIVERSAL::VERSION, when used as a function, like this:
print $module->VERSION;
-will also exclusively return the stringified form. See L<Stringification>
+will also exclusively return the stringified form. See L</Stringification>
for more details.
=head1 USAGE DETAILS
@@ -438,9 +438,9 @@ With Perl >= 5.6.2, you can also use a line like this:
use Example 1.2.3;
and it will again work (i.e. give the error message as above), even with
-releases of Perl which do not normally support v-strings (see L<version/What about v-strings> below). This has to do with that fact that C<use> only checks
+releases of Perl which do not normally support v-strings (see L<What about v-strings?> above). This has to do with that fact that C<use> only checks
to see if the second term I<looks like a number> and passes that to the
-replacement L<UNIVERSAL::VERSION>. This is not true in Perl 5.005_04,
+replacement L<UNIVERSAL::VERSION|UNIVERSAL/VERSION>. This is not true in Perl 5.005_04,
however, so you are B<strongly encouraged> to always use a Decimal version
in your code, even for those versions of Perl which support the Dotted-Decimal
version.
@@ -541,7 +541,7 @@ For the subsequent examples, the following three objects will be used:
For any version object which is initialized with multiple decimal
places (either quoted or if possible v-string), or initialized using
-the L<qv>() operator, the stringified representation is returned in
+the L<qv()|version/qv()> operator, the stringified representation is returned in
a normalized or reduced form (no extraneous zeros), and with a leading 'v':
print $ver->normal; # prints as v1.2.3.4
@@ -600,27 +600,27 @@ For example:
qv("v1.3.5") v1.3.5
qv("1.2") v1.2 ### exceptional case
-See also L<UNIVERSAL::VERSION>, as this also returns the stringified form
+See also L<UNIVERSAL::VERSION|UNIVERSAL/VERSION>, as this also returns the stringified form
when used as a class method.
IMPORTANT NOTE: There is one exceptional cases shown in the above table
where the "initializer" is not stringwise equivalent to the stringified
representation. If you use the C<qv>() operator on a version without a
leading 'v' B<and> with only a single decimal place, the stringified output
-will have a leading 'v', to preserve the sense. See the L<qv>() operator
+will have a leading 'v', to preserve the sense. See the L</qv()> operator
for more details.
IMPORTANT NOTE 2: Attempting to bypass the normal stringification rules by
-manually applying L<numify>() and L<normal>() will sometimes yield
+manually applying L<numify()|version/numify()> and L<normal()|version/normal()> will sometimes yield
surprising results:
print version->new(version->new("v1.0")->numify)->normal; # v1.0.0
-The reason for this is that the L<numify>() operator will turn "v1.0"
+The reason for this is that the L<numify()|version/numify()> operator will turn "v1.0"
into the equivalent string "1.000000". Forcing the outer version object
-to L<normal>() form will display the mathematically equivalent "v1.0.0".
+to L<normal()|version/normal()> form will display the mathematically equivalent "v1.0.0".
-As the example in L<new>() shows, you can always create a copy of an
+As the example in L</new()> shows, you can always create a copy of an
existing version object with the same value by the very compact:
$v2 = $v1->new($v1);
diff --git a/Master/tlpkg/tlperl/lib/version/Requirements.pm b/Master/tlpkg/tlperl/lib/version/Requirements.pm
index f6671892829..39ae2060909 100644
--- a/Master/tlpkg/tlperl/lib/version/Requirements.pm
+++ b/Master/tlpkg/tlperl/lib/version/Requirements.pm
@@ -1,8 +1,8 @@
use strict;
use warnings;
package Version::Requirements;
-BEGIN {
- $Version::Requirements::VERSION = '0.101020';
+{
+ $Version::Requirements::VERSION = '0.101022';
}
# ABSTRACT: a set of version requirements for a CPAN dist
@@ -11,6 +11,13 @@ use Carp ();
use Scalar::Util ();
use version 0.77 (); # the ->parse method
+# We silence this warning during core tests, because this is only in core
+# because it has to be, and nobody wants to see this stupid warning.
+# -- rjbs, 2012-01-20
+Carp::cluck(
+ "Version::Requirements is deprecated; replace with CPAN::Meta::Requirements"
+) unless $ENV{PERL_CORE};
+
sub new {
my ($class) = @_;
@@ -184,9 +191,6 @@ sub from_string_hash {
{
package
Version::Requirements::_Range::Exact;
-BEGIN {
- $Version::Requirements::_Range::Exact::VERSION = '0.101020';
-}
sub _new { bless { version => $_[1] } => $_[0] }
sub _accepts { return $_[0]{version} == $_[1] }
@@ -231,9 +235,6 @@ BEGIN {
{
package
Version::Requirements::_Range::Range;
-BEGIN {
- $Version::Requirements::_Range::Range::VERSION = '0.101020';
-}
sub _self { ref($_[0]) ? $_[0] : (bless { } => $_[0]) }
@@ -392,7 +393,7 @@ Version::Requirements - a set of version requirements for a CPAN dist
=head1 VERSION
-version 0.101020
+version 0.101022
=head1 SYNOPSIS
@@ -583,7 +584,7 @@ Version::Requirements object.
=head1 AUTHOR
- Ricardo Signes <rjbs@cpan.org>
+Ricardo Signes <rjbs@cpan.org>
=head1 COPYRIGHT AND LICENSE