CPANPLUS::Internals::Report
];
-$VERSION = "0.78";
+$VERSION = "0.83_08";
=pod
=pod
+=back
+
=head1 METHODS
=head2 $internals = CPANPLUS::Internals->_init( _conf => CONFIG_OBJ )
### if extra callbacks are added, don't forget to update the
### 02-internals.t test script with them!
my $callback_map = {
- ### name default value
+ ### name default value
install_prerequisite => 1, # install prereqs when 'ask' is set?
edit_test_report => 0, # edit the prepared test report?
send_test_report => 1, # send the test report?
munge_test_report => sub { return $_[1] },
# filter out unwanted prereqs
filter_prereqs => sub { return $_[1] },
+ # continue if 'make test' fails?
+ proceed_on_test_failure => sub { return 0 },
+ munge_dist_metafile => sub { return $_[1] },
};
my $status = Object::Accessor->new;
if( my $id = $class->_last_id ) {
# make it a singleton.
warn loc(q[%1 currently only supports one %2 object per ] .
- q[running program], 'CPANPLUS', $class);
+ qq[running program\n], 'CPANPLUS', $class);
return $class->_retrieve_id( $id );
}
indicating true to edit the test report in an editor and false
to skip it.
+=item proceed_on_test_failure
+
+Is called when 'make test' or 'Build test' fails. Should return
+a boolean indicating whether the install should continue even if
+the test failed.
+
+=item munge_dist_metafile
+
+Is called when the C<CPANPLUS::Dist::*> metafile is created, like
+C<control> for C<CPANPLUS::Dist::Deb>, giving the user a chance to
+programatically alter it. Should return the (munged) text to be
+written to the metafile.
+
=back
=cut