Force a non-segfaulting version of XML::LibXML
[catagits/XML-Feed.git] / inc / Module / Install / Build.pm
index 184011b..0b94be8 100644 (file)
@@ -1,9 +1,12 @@
-#line 1 "inc/Module/Install/Build.pm - /Library/Perl/5.8.1/Module/Install/Build.pm"
+#line 1
 package Module::Install::Build;
-$VERSION = '0.01';
+
+use Module::Install::Base;
+@ISA = qw(Module::Install::Base);
+
+$VERSION = '0.61';
+
 use strict;
-use vars qw(@ISA);
-use Module::Install::Base; @ISA = qw(Module::Install::Base);
 
 sub Build { $_[0] }
 
@@ -14,13 +17,14 @@ sub write {
     my %args;
     my $build;
 
-    $args{dist_name} = $self->name || $self->determine_NAME($self->{args});
-    $args{license} = $self->license;
-    $args{dist_version} = $self->version || $self->determine_VERSION($self->{args});
+    $args{dist_name}     = $self->name || $self->determine_NAME($self->{args});
+    $args{license}       = $self->license;
+    $args{test_files}    = $self->tests;
+    $args{dist_version}  = $self->version || $self->determine_VERSION($self->{args});
     $args{dist_abstract} = $self->abstract;
-    $args{dist_author} = $self->author;
-    $args{sign} = $self->sign;
-    $args{no_index} = $self->no_index;
+    $args{dist_author}   = $self->author;
+    $args{sign}          = $self->sign;
+    $args{no_index}      = $self->no_index;
 
     foreach my $key (qw(build_requires requires recommends conflicts)) {
         my $val = eval "\$self->$key" or next;
@@ -55,9 +59,8 @@ sub ACTION_dist {
 # <DrMath> ingy: then my $build = new MyBuilder( ...parameters... );
 #           $build->write_build_script;
 
-
 1;
 
 __END__
 
-#line 175
+#line 177