Changeset 504


Ignore:
Timestamp:
10/26/08 08:48:54 (3 years ago)
Author:
tsee
Message:

use Padre::PluginBuilder? for the extra build targets

File:
1 edited

Legend:

Unmodified
Added
Removed
  • plugins/par/Build.PL

    r495 r504  
    33use warnings; 
    44 
    5 use Module::Build (); 
    6 my $class = Module::Build->subclass( 
    7   class => 'Padre::Plugin::Builder', 
    8   code => <<'HEREDOC', 
    9 sub ACTION_plugin { 
    10   my ($self) = @_; 
     5use Padre::PluginBuilder (); 
    116 
    12   # Need PAR::Dist 
    13   if ( not eval { require PAR::Dist; PAR::Dist->VERSION(0.17) } ) { 
    14     $self->log_warn( "In order to create .par files, you need to install PAR::Dist first." ); 
    15     return(); 
    16   } 
    17   $self->depends_on( 'build' ); 
    18   my $module = $self->module_name(); 
    19   $module =~ s/^Padre::Plugin:://; 
    20  
    21   return PAR::Dist::blib_to_par( 
    22     name => $self->dist_name, 
    23     version => $self->dist_version, 
    24     dist => "$module.par", 
    25   ); 
    26 } 
    27  
    28 sub ACTION_installplugin { 
    29   my ($self) = @_; 
    30  
    31   $self->depends_on( 'plugin' ); 
    32  
    33   my $module = $self->module_name(); 
    34   $module =~ s/^Padre::Plugin:://; 
    35   my $plugin = "$module.par"; 
    36  
    37   require Padre; 
    38   my $plugin_dir = Padre::Config->default_plugin_dir; 
    39  
    40   return $self->copy_if_modified(from => $plugin, to_dir => $plugin_dir); 
    41 } 
    42 HEREDOC 
    43 ); 
    44  
    45 my $builder = $class->new( 
     7my $builder = Padre::PluginBuilder->new( 
    468    module_name           => 'Padre::Plugin::PAR', 
    479    license               => 'perl', 
     
    5113    recursive_test_files  => 0, 
    5214 
     15    configure_requires    => { 
     16        'Padre::PluginBuilder'    => '0.12', 
     17    }, 
    5318    requires              => { 
    5419        'perl'                    => '5.008', 
     
    6227    }, 
    6328    build_requires        => { 
    64         'Test::More'                => '0.47', 
     29        'Test::More'              => '0.47', 
    6530    }, 
    6631); 
Note: See TracChangeset for help on using the changeset viewer.