dump configs in all plugins that have one

Changes

@@ -1,6 +1,7 @@
 Revision history for {{$dist->name}}
 
 {{$NEXT}}
+        - more plugins add their config to metadata when [MetaConfig] is used
 
 5.044     2016-04-06 20:32:14-04:00 America/New_York
         - require a newer List::Util to avoid a dumb bug caused by relying on

corpus/dist/AuthorDeps/dist.ini

@@ -23,3 +23,5 @@ version = 2
 :version = 5.0
 encoding = bytes
 filename = t/data.bin
+
+[MetaConfig]

corpus/dist/AutoPrereqs/dist.ini

@@ -20,3 +20,5 @@ filename = t/data.bin
 
 [Prereqs / DevelopRequires]
 String::Formatter = 0
+
+[MetaConfig]

corpus/dist/DZ-NonAscii/dist.ini

@@ -8,3 +8,4 @@ copyright_holder = ภูมิพลอดุลยเดช
 [@Classic]
 [MetaJSON]
 [NextRelease]
+[MetaConfig]

corpus/dist/DZ1/dist.ini

@@ -5,3 +5,4 @@ license = Perl_5
 copyright_holder = E. Xavier Ample
 
 [@Classic]
+[MetaConfig]

lib/Dist/Zilla/Plugin/AutoPrereqs.pm

@@ -126,8 +126,23 @@ has scanners => (
 has skips => (
   is  => 'ro',
   isa => 'ArrayRef[Str]',
+  default => sub { [] },
 );
 
+around dump_config => sub {
+  my $orig = shift;
+  my $self = shift;
+
+  my $config = $self->$orig;
+
+  $config->{+__PACKAGE__} = {
+    (map { $_ => [ sort @{ $self->$_ } ] } qw(finder test_finder configure_finder extra_scanners skips)),
+    ($self->has_scanners ? (scanners => $self->scanners) : ()),
+  };
+
+  return $config;
+};
+
 sub register_prereqs {
   my $self  = shift;
 

lib/Dist/Zilla/Plugin/AutoVersion.pm

@@ -64,6 +64,19 @@ has format => (
             . q<{{$ENV{DEV} ? (sprintf '_%03u', $ENV{DEV}) : ''}}>
 );
 
+around dump_config => sub {
+  my $orig = shift;
+  my $self = shift;
+
+  my $config = $self->$orig;
+
+  $config->{+__PACKAGE__} = {
+    map { $_ => $self->$_ } qw(major format time_zone),
+  };
+
+  return $config;
+};
+
 sub provide_version {
   my ($self) = @_;
 

lib/Dist/Zilla/Plugin/CPANFile.pm

@@ -37,6 +37,17 @@ sub _hunkify_hunky_hunk_hunks {
   return $str;
 }
 
+around dump_config => sub {
+  my $orig = shift;
+  my $self = shift;
+
+  my $config = $self->$orig;
+
+  $config->{+__PACKAGE__} = { filename => $self->filename };
+
+  return $config;
+};
+
 sub gather_files {
   my ($self, $arg) = @_;
 

lib/Dist/Zilla/Plugin/Encoding.pm

@@ -78,6 +78,20 @@ has ignore => (
   default => sub { [] },
 );
 
+around dump_config => sub {
+  my $orig = shift;
+  my $self = shift;
+
+  my $config = $self->$orig;
+
+  $config->{+__PACKAGE__} = {
+    encoding => $self->encoding,
+    map { $_ => [ sort @{ $self->$_ } ] } qw(filenames matches),
+  };
+
+  return $config;
+};
+
 sub set_file_encodings {
   my ($self) = @_;
 

lib/Dist/Zilla/Plugin/ExecDir.pm

@@ -32,5 +32,17 @@ sub find_files {
 }
 
 with 'Dist::Zilla::Role::ExecFiles';
+
+around dump_config => sub {
+  my $orig = shift;
+  my $self = shift;
+
+  my $config = $self->$orig;
+
+  $config->{+__PACKAGE__} = { dir => $self->dir };
+
+  return $config;
+};
+
 __PACKAGE__->meta->make_immutable;
 1;

lib/Dist/Zilla/Plugin/FakeRelease.pm

@@ -13,6 +13,17 @@ has user => (
   default  => 'AUTHORID',
 );
 
+around dump_config => sub {
+  my $orig = shift;
+  my $self = shift;
+
+  my $config = $self->$orig;
+
+  $config->{+__PACKAGE__} = { user => $self->user };
+
+  return $config;
+};
+
 sub release {
   my $self = shift;
 

lib/Dist/Zilla/Plugin/FileFinder/ByName.pm

@@ -107,6 +107,19 @@ sub _join_re {
   $re;
 }
 
+around dump_config => sub {
+  my $orig = shift;
+  my $self = shift;
+
+  my $config = $self->$orig;
+
+  $config->{+__PACKAGE__} = {
+    map { $_ => [ sort @{ $self->$_ } ] } qw(dirs files matches skips),
+  };
+
+  return $config;
+};
+
 sub find_files {
   my $self = shift;
 

lib/Dist/Zilla/Plugin/FileFinder/Filter.pm

@@ -59,6 +59,19 @@ sub mvp_aliases { +{ qw(
 
 sub mvp_multivalue_args { qw(skips) }
 
+around dump_config => sub {
+  my $orig = shift;
+  my $self = shift;
+
+  my $config = $self->$orig;
+
+  $config->{+__PACKAGE__} = {
+    map { $_ => [ sort @{ $self->$_ } ] } qw(finder skips),
+  };
+
+  return $config;
+};
+
 sub find_files {
   my $self = shift;
 

lib/Dist/Zilla/Plugin/FinderCode.pm

@@ -20,6 +20,17 @@ has style => (
   required => 1,
 );
 
+around dump_config => sub {
+  my $orig = shift;
+  my $self = shift;
+
+  my $config = $self->$orig;
+
+  $config->{+__PACKAGE__} = { style => $self->style };
+
+  return $config;
+};
+
 sub find_files {
   my ($self) = @_;
 

lib/Dist/Zilla/Plugin/GenerateFile.pm

@@ -103,6 +103,20 @@ has name_is_template => (
   default => 0,
 );
 
+around dump_config => sub {
+  my $orig = shift;
+  my $self = shift;
+
+  my $config = $self->$orig;
+
+  $config->{+__PACKAGE__} = {
+    filename => $self->filename,
+    map { $_ => $self->$_ ? 1 : 0 } qw(content_is_template name_is_template),
+  };
+
+  return $config;
+};
+
 sub gather_files {
   my ($self, $arg) = @_;
 

lib/Dist/Zilla/Plugin/License.pm

@@ -26,6 +26,19 @@ has filename => (
   default => 'LICENSE',
 );
 
+around dump_config => sub {
+  my $orig = shift;
+  my $self = shift;
+
+  my $config = $self->$orig;
+
+  $config->{+__PACKAGE__} = {
+    filename => $self->filename,
+  };
+
+  return $config;
+};
+
 sub gather_files {
   my ($self, $arg) = @_;
 

lib/Dist/Zilla/Plugin/MakeMaker.pm

@@ -91,6 +91,20 @@ with qw(
   Dist::Zilla::Role::TextTemplate
 );
 
+around dump_config => sub {
+  my $orig = shift;
+  my $self = shift;
+
+  my $config = $self->$orig;
+
+  $config->{+__PACKAGE__} = {
+    make_path => $self->make_path,
+    # default_jobs is dumped by TestRunner
+  };
+
+  return $config;
+};
+
 my $template = q!# This file was automatically generated by {{ $generated_by }}.
 use strict;
 use warnings;

lib/Dist/Zilla/Plugin/ManifestSkip.pm

@@ -33,6 +33,17 @@ Other modules: L<ExtUtils::Manifest>.
 
 has skipfile => (is => 'ro', required => 1, default => 'MANIFEST.SKIP');
 
+around dump_config => sub {
+  my $orig = shift;
+  my $self = shift;
+
+  my $config = $self->$orig;
+
+  $config->{+__PACKAGE__} = { skipfile => $self->skipfile };
+
+  return $config;
+};
+
 sub prune_files {
   my ($self) = @_;
   my $files = $self->zilla->files;

lib/Dist/Zilla/Plugin/MetaJSON.pm

@@ -42,6 +42,19 @@ has version => (
   default => '2',
 );
 
+around dump_config => sub {
+  my $orig = shift;
+  my $self = shift;
+
+  my $config = $self->$orig;
+
+  $config->{+__PACKAGE__} = {
+    map { $_ => $self->$_ } qw(filename version),
+  };
+
+  return $config;
+};
+
 sub gather_files {
   my ($self, $arg) = @_;
 

lib/Dist/Zilla/Plugin/MetaNoIndex.pm

@@ -92,6 +92,19 @@ for my $attr (keys %ATTR_ALIAS) {
   );
 }
 
+around dump_config => sub {
+  my $orig = shift;
+  my $self = shift;
+
+  my $config = $self->$orig;
+
+  $config->{+__PACKAGE__} = {
+    map { $_ => [ sort @{ $self->$_ } ] } qw(directories files packages namespaces),
+  };
+
+  return $config;
+};
+
 =method metadata
 
 Returns a reference to a hash containing the distribution's no_index metadata.

lib/Dist/Zilla/Plugin/MetaResources.pm

@@ -64,6 +64,18 @@ around BUILDARGS => sub {
   };
 };
 
+around dump_config => sub {
+  my $orig = shift;
+  my $self = shift;
+
+  my $config = $self->$orig;
+
+  $config->{+__PACKAGE__} = { resources => $self->resources };
+
+  return $config;
+};
+
+
 sub metadata {
   my ($self) = @_;
 

lib/Dist/Zilla/Plugin/MetaYAML.pm

@@ -45,6 +45,17 @@ has version => (
   default => '1.4',
 );
 
+around dump_config => sub {
+  my $orig = shift;
+  my $self = shift;
+
+  my $config = $self->$orig;
+
+  $config->{+__PACKAGE__} = { version => $self->version };
+
+  return $config;
+};
+
 sub gather_files {
   my ($self, $arg) = @_;
 

lib/Dist/Zilla/Plugin/ModuleBuild.pm

@@ -127,6 +127,19 @@ sub _add_build_elements {
   return '$build->add_build_element($_) for qw(' . join(' ', @elems) . ');';
 }
 
+around dump_config => sub {
+  my $orig = shift;
+  my $self = shift;
+
+  my $config = $self->$orig;
+
+  $config->{+__PACKAGE__} = {
+    map { $_ => $self->$_ } qw(mb_version mb_class mb_lib),
+  };
+
+  return $config;
+};
+
 sub register_prereqs {
   my ($self) = @_;