—package
Dist::Zilla::Plugin::MetaYAML 6.008;
# ABSTRACT: produce a META.yml
use
Moose;
use
Try::Tiny;
use
namespace::autoclean;
#pod =head1 DESCRIPTION
#pod
#pod This plugin will add a F<META.yml> file to the distribution.
#pod
#pod For more information on this file, see L<Module::Build::API> and L<CPAN::Meta>.
#pod
#pod =attr filename
#pod
#pod If given, parameter allows you to specify an alternate name for the generated
#pod file. It defaults, of course, to F<META.yml>.
#pod
#pod =cut
has
filename
=> (
is
=>
'ro'
,
isa
=>
'Str'
,
default
=>
'META.yml'
,
);
sub
gather_files {
my
(
$self
,
$arg
) =
@_
;
CPAN::Meta::Converter->VERSION(2.101550);
# improved downconversion
CPAN::Meta::Validator->VERSION(2.101550);
# improved downconversion
my
$zilla
=
$self
->zilla;
my
$file
= Dist::Zilla::File::FromCode->new({
name
=>
$self
->filename,
code_return_type
=>
'text'
,
code
=>
sub
{
my
$distmeta
=
$zilla
->distmeta;
my
$validator
= CPAN::Meta::Validator->new(
$distmeta
);
unless
(
$validator
->is_valid) {
my
$msg
=
"Invalid META structure. Errors found:\n"
;
$msg
.=
join
(
"\n"
,
$validator
->errors );
$self
->log_fatal(
$msg
);
}
my
$converter
= CPAN::Meta::Converter->new(
$distmeta
);
my
$output
=
$converter
->convert(
version
=>
'1.4'
);
$output
->{x_serialization_backend} =
sprintf
'%s version %s'
,
'YAML::Tiny'
, YAML::Tiny->VERSION;
my
$yaml
=
try
{
YAML::Tiny->new(
$output
)->write_string;
# text!
}
catch
{
$self
->log_fatal(
"Could not create YAML string: "
. YAML::Tiny->errstr)
};
return
$yaml
;
},
});
$self
->add_file(
$file
);
return
;
}
__PACKAGE__->meta->make_immutable;
1;
#pod =head1 SEE ALSO
#pod
#pod Core Dist::Zilla plugins:
#pod L<@Basic|Dist::Zilla::PluginBundle::Basic>,
#pod L<Manifest|Dist::Zilla::Plugin::Manifest>.
#pod
#pod Dist::Zilla roles:
#pod L<FileGatherer|Dist::Zilla::Role::FileGatherer>.
#pod
#pod Other modules:
#pod L<CPAN::Meta>,
#pod L<CPAN::Meta::Spec>, L<YAML>.
#pod
#pod =cut
__END__
=pod
=encoding UTF-8
=head1 NAME
Dist::Zilla::Plugin::MetaYAML - produce a META.yml
=head1 VERSION
version 6.008
=head1 DESCRIPTION
This plugin will add a F<META.yml> file to the distribution.
For more information on this file, see L<Module::Build::API> and L<CPAN::Meta>.
=head1 ATTRIBUTES
=head2 filename
If given, parameter allows you to specify an alternate name for the generated
file. It defaults, of course, to F<META.yml>.
=head1 SEE ALSO
Core Dist::Zilla plugins:
L<@Basic|Dist::Zilla::PluginBundle::Basic>,
L<Manifest|Dist::Zilla::Plugin::Manifest>.
Dist::Zilla roles:
L<FileGatherer|Dist::Zilla::Role::FileGatherer>.
Other modules:
L<CPAN::Meta>,
L<CPAN::Meta::Spec>, L<YAML>.
=head1 AUTHOR
Ricardo SIGNES 😏 <rjbs@cpan.org>
=head1 COPYRIGHT AND LICENSE
This software is copyright (c) 2016 by Ricardo SIGNES.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
=cut