diff options
Diffstat (limited to 'Master/tlpkg/tlperl/lib/CPAN/Meta/Feature.pm')
-rw-r--r-- | Master/tlpkg/tlperl/lib/CPAN/Meta/Feature.pm | 73 |
1 files changed, 37 insertions, 36 deletions
diff --git a/Master/tlpkg/tlperl/lib/CPAN/Meta/Feature.pm b/Master/tlpkg/tlperl/lib/CPAN/Meta/Feature.pm index f97cc652e83..4bfbb19b4c7 100644 --- a/Master/tlpkg/tlperl/lib/CPAN/Meta/Feature.pm +++ b/Master/tlpkg/tlperl/lib/CPAN/Meta/Feature.pm @@ -2,28 +2,29 @@ use 5.006; use strict; use warnings; package CPAN::Meta::Feature; -our $VERSION = '2.140640'; # VERSION + +our $VERSION = '2.150001'; use CPAN::Meta::Prereqs; -# =head1 DESCRIPTION -# -# A CPAN::Meta::Feature object describes an optional feature offered by a CPAN -# distribution and specified in the distribution's F<META.json> (or F<META.yml>) -# file. -# -# For the most part, this class will only be used when operating on the result of -# the C<feature> or C<features> methods on a L<CPAN::Meta> object. -# -# =method new -# -# my $feature = CPAN::Meta::Feature->new( $identifier => \%spec ); -# -# This returns a new Feature object. The C<%spec> argument to the constructor -# should be the same as the value of the C<optional_feature> entry in the -# distmeta. It must contain entries for C<description> and C<prereqs>. -# -# =cut +#pod =head1 DESCRIPTION +#pod +#pod A CPAN::Meta::Feature object describes an optional feature offered by a CPAN +#pod distribution and specified in the distribution's F<META.json> (or F<META.yml>) +#pod file. +#pod +#pod For the most part, this class will only be used when operating on the result of +#pod the C<feature> or C<features> methods on a L<CPAN::Meta> object. +#pod +#pod =method new +#pod +#pod my $feature = CPAN::Meta::Feature->new( $identifier => \%spec ); +#pod +#pod This returns a new Feature object. The C<%spec> argument to the constructor +#pod should be the same as the value of the C<optional_feature> entry in the +#pod distmeta. It must contain entries for C<description> and C<prereqs>. +#pod +#pod =cut sub new { my ($class, $identifier, $spec) = @_; @@ -37,28 +38,28 @@ sub new { bless \%guts => $class; } -# =method identifier -# -# This method returns the feature's identifier. -# -# =cut +#pod =method identifier +#pod +#pod This method returns the feature's identifier. +#pod +#pod =cut sub identifier { $_[0]{identifier} } -# =method description -# -# This method returns the feature's long description. -# -# =cut +#pod =method description +#pod +#pod This method returns the feature's long description. +#pod +#pod =cut sub description { $_[0]{description} } -# =method prereqs -# -# This method returns the feature's prerequisites as a L<CPAN::Meta::Prereqs> -# object. -# -# =cut +#pod =method prereqs +#pod +#pod This method returns the feature's prerequisites as a L<CPAN::Meta::Prereqs> +#pod object. +#pod +#pod =cut sub prereqs { $_[0]{prereqs} } @@ -78,7 +79,7 @@ CPAN::Meta::Feature - an optional feature provided by a CPAN distribution =head1 VERSION -version 2.140640 +version 2.150001 =head1 DESCRIPTION |