Add permanent plumbing for _TempExtlib (d0435d75)

[dbsrgits/DBIx-Class.git] / maint / gen_pod_inherit

diff --git a/maint/gen_pod_inherit b/maint/gen_pod_inherit
index b7adc14..4164da6 100755 (executable)
--- a/maint/gen_pod_inherit
+++ b/maint/gen_pod_inherit
@@ -3,17 +3,33 @@
 use warnings;
 use strict;
 
+use DBIx::Class::_Util; # load early in case any shims are needed
+
 my $lib_dir = 'lib';
-my $pod_dir = '.generated_pod';
+my $pod_dir = 'maint/.Generated_Pod';
+
+my $result_metapod_fn = "$lib_dir/DBIx/Class/Manual/ResultClass.pod";
 
 die "POD generator must be executed from the dist root\n"
   unless -d $lib_dir and -d $pod_dir;
 
+require File::Copy;
+File::Copy::copy(
+  "$result_metapod_fn.proto",
+  "$result_metapod_fn",
+) or die "Copying ResultClass proto pod ($result_metapod_fn) failed: $!";
+
+# cleanup
+END {
+  local ($@, $!, $?);
+  unlink $result_metapod_fn;
+}
+
 require Pod::Inherit;
 
 Pod::Inherit->new({
    input_files       => $lib_dir,
-   out_dir           => $pod_dir,
+   out_dir           => "$pod_dir/lib",
    force_permissions => 1,
    class_map         => {
       "DBIx::Class::Relationship::HasMany"    => "DBIx::Class::Relationship",
@@ -31,6 +47,7 @@ Pod::Inherit->new({
       lib/DBIx/Class/DB.pm
       lib/DBIx/Class/CDBICompat/
       lib/DBIx/Class/CDBICompat.pm
+      lib/DBIx/Class/_TempExtlib/
    ),
    # skip the ::Storage:: family for now
    qw(