Commit | Line | Data |
---|---|---|
903f4ce9 | 1 | package inc::CheckDelta; |
2 | use Moose; | |
3 | ||
4 | use Path::Class; | |
5 | ||
6 | with 'Dist::Zilla::Role::BeforeRelease'; | |
7 | ||
8 | sub before_release { | |
9 | my $self = shift; | |
10 | ||
11 | my ($delta) = grep { $_->name eq 'lib/Moose/Manual/Delta.pod' } | |
12 | @{ $self->zilla->files }; | |
13 | ||
14 | die "Moose::Manual::Delta still contains \$NEXT" | |
15 | if $delta->content =~ /\$NEXT/; | |
16 | } | |
17 | ||
18 | 1; |