File Coverage

blib/lib/Dist/Zilla/Plugin/ChangesFromYaml/Convert.pm

Criterion	Covered	Total	%
statement	26	26	100.0
branch			n/a
condition			n/a
subroutine	7	7	100.0
pod	0	1	0.0
total	33	34	97.0

#!/usr/bin/env perl
package Dist::Zilla::Plugin::ChangesFromYaml::Convert;
our $VERSION = '0.001'; # TRIAL VERSION

use 5.010;
use strict;
use warnings;
use YAML::XS;
use CPAN::Changes;
use Exporter 'import';
our @EXPORT_OK = qw(convert);

sub convert {
    my ($changes_yml) = @_;
    my $changes = CPAN::Changes->new;

    my @releases = Load( $changes_yml );

    for (@releases) {
        my $rel = CPAN::Changes::Release->new(
            version => $_->{version},
            date    => $_->{date},
        );

        $rel->add_changes($_) for @{ $_->{changes} };
        $changes->add_release($rel);
    }
    return $changes->serialize;
}