Changeset 495

Timestamp:

10/26/08 07:56:39 (3 years ago)

Author:

tsee

Message:

Add plugin and installplugin targets

File:

• plugins/par/Build.PL (modified) (1 diff)

plugins/par/Build.PL

@@ +1 @@
+use 5.008;
 use strict;
 use warnings;
 
-use Module::Build         ();
+use Module::Build ();
+my $class = Module::Build->subclass(
+  class => 'Padre::Plugin::Builder',
+  code => <<'HEREDOC',
+sub ACTION_plugin {
+  my ($self) = @_;
 
-my $builder = Module::Build->new(
+  # Need PAR::Dist
+  if ( not eval { require PAR::Dist; PAR::Dist->VERSION(0.17) } ) {
+    $self->log_warn( "In order to create .par files, you need to install PAR::Dist first." );
+    return();
+  }
+  $self->depends_on( 'build' );
+  my $module = $self->module_name();
+  $module =~ s/^Padre::Plugin:://;
+
+  return PAR::Dist::blib_to_par(
+    name => $self->dist_name,
+    version => $self->dist_version,
+    dist => "$module.par",
+  );
+}
+
+sub ACTION_installplugin {
+  my ($self) = @_;
+
+  $self->depends_on( 'plugin' );
+
+  my $module = $self->module_name();
+  $module =~ s/^Padre::Plugin:://;
+  my $plugin = "$module.par";
+
+  require Padre;
+  my $plugin_dir = Padre::Config->default_plugin_dir;
+
+  return $self->copy_if_modified(from => $plugin, to_dir => $plugin_dir);
+}
+HEREDOC
+);
+
+my $builder = $class->new(
     module_name           => 'Padre::Plugin::PAR',
     license               => 'perl',