[Bast-commits] r8786 - DBIx-Class/0.08/branches/dbicadmin_pod

ribasushi at dev.catalyst.perl.org ribasushi at dev.catalyst.perl.org
Sun Feb 21 12:37:30 GMT 2010


Author: ribasushi
Date: 2010-02-21 12:37:30 +0000 (Sun, 21 Feb 2010)
New Revision: 8786

Modified:
   DBIx-Class/0.08/branches/dbicadmin_pod/Makefile.PL
Log:
Reorder makefile author actions to make output more readable

Modified: DBIx-Class/0.08/branches/dbicadmin_pod/Makefile.PL
===================================================================
--- DBIx-Class/0.08/branches/dbicadmin_pod/Makefile.PL	2010-02-21 12:36:35 UTC (rev 8785)
+++ DBIx-Class/0.08/branches/dbicadmin_pod/Makefile.PL	2010-02-21 12:37:30 UTC (rev 8786)
@@ -59,28 +59,9 @@
   test_requires => { %$test_requires },
 };
 
-# autogenerate docs and require extra modules for testing if we're in a checkout
+
+# require extra modules for testing if we're in a checkout
 if ($Module::Install::AUTHOR) {
-
-  print "Regenerating README\n";
-  system('pod2text lib/DBIx/Class.pm > README');
-
-  if (-f 'MANIFEST') {
-    print "Removing MANIFEST\n";
-    unlink 'MANIFEST';
-  }
-
-  print "Regenerating dbicadmin.pod\n";
-  system('perl script/dbicadmin --pod > lib/dbicadmin.pod');
-
-  print "Regenerating Optional/Dependencies.pod\n";
-  require DBIx::Class::Optional::Dependencies;
-  DBIx::Class::Optional::Dependencies->_gen_pod;
-
-# FIXME Disabled due to unsolved issues, ask theorbtwo
-#  require Module::Install::Pod::Inherit;
-#  PodInherit();
-
   warn <<'EOW';
 ******************************************************************************
 ******************************************************************************
@@ -92,6 +73,7 @@
 
 EOW
 
+  require DBIx::Class::Optional::Dependencies;
   $reqs->{test_requires} = {
     %{$reqs->{test_requires}},
     %{DBIx::Class::Optional::Dependencies->_all_optional_requirements},
@@ -119,6 +101,31 @@
   $rtype->($mod, $ver);
 }
 
+auto_install();
+
+# re-create various autogenerated documentation bits
+if ($Module::Install::AUTHOR) {
+
+  print "Regenerating README\n";
+  system('pod2text lib/DBIx/Class.pm > README');
+
+  if (-f 'MANIFEST') {
+    print "Removing MANIFEST\n";
+    unlink 'MANIFEST';
+  }
+
+  print "Regenerating dbicadmin.pod\n";
+  system('perl script/dbicadmin --pod > lib/dbicadmin.pod');
+
+  print "Regenerating Optional/Dependencies.pod\n";
+  require DBIx::Class::Optional::Dependencies;
+  DBIx::Class::Optional::Dependencies->_gen_pod;
+
+  # FIXME Disabled due to unsolved issues, ask theorbtwo
+  #  require Module::Install::Pod::Inherit;
+  #  PodInherit();
+}
+
 install_script (qw|
     script/dbicadmin
 |);
@@ -142,8 +149,6 @@
 /);
 
 
-auto_install();
-
 WriteAll();
 
 




More information about the Bast-commits mailing list