[lucy-commits] svn commit: r1298057 - in /incubator/lucy/branches/0.3: ./ perl/buildlib/Lucy/Build.pm

[marvin]

Author: marvin
Date: Wed Mar  7 19:38:19 2012
New Revision: 1298057

URL: http://svn.apache.org/viewvc?rev=1298057&view=rev
Log:
Require Module::Build v0.38 for creating a distribution.

Modified:
    incubator/lucy/branches/0.3/   (props changed)
    incubator/lucy/branches/0.3/perl/buildlib/Lucy/Build.pm

Propchange: incubator/lucy/branches/0.3/
------------------------------------------------------------------------------
--- svn:mergeinfo (original)
+++ svn:mergeinfo Wed Mar  7 19:38:19 2012
@@ -1 +1 @@
-/incubator/lucy/trunk:1225600-1225601,1226190-1226191,1226199,1226310,1226462-1226463,1227324,1229862-1229867,1232278,1242618,1294458,1294461,1294825,1296755
+/incubator/lucy/trunk:1225600-1225601,1226190-1226191,1226199,1226310,1226462-1226463,1227324,1229862-1229867,1232278,1242618,1294458,1294461,1294825,1296755-1296756

Modified: incubator/lucy/branches/0.3/perl/buildlib/Lucy/Build.pm
URL: 
http://svn.apache.org/viewvc/incubator/lucy/branches/0.3/perl/buildlib/Lucy/Build.pm?rev=1298057&r1=1298056&r2=1298057&view=diff
==============================================================================
--- incubator/lucy/branches/0.3/perl/buildlib/Lucy/Build.pm (original)
+++ incubator/lucy/branches/0.3/perl/buildlib/Lucy/Build.pm Wed Mar  7 19:38:19 
2012
@@ -680,8 +680,20 @@ sub autogen_header {
 END_AUTOGEN
 }
 
+sub _check_module_build_for_dist {
+    eval "use Module::Build 0.38;";
+    die "./Build dist reqiures Module::Build 0.38 or higher--this is only "
+        . Module::Build->VERSION . $/ if $@;
+}
+
+sub ACTION_distdir {
+    _check_module_build_for_dist;
+    shift->SUPER::ACTION_distdir(@_);
+}
+
 sub ACTION_dist {
     my $self = shift;
+    _check_module_build_for_dist;
 
     # Create POD but make sure not to include build artifacts.
     $self->dispatch('pod');