}
my %gentooism = (
- 'Digest' => 'digest-base',
- 'Locale-Maketext' => 'locale-maketext',
- 'Net-Ping' => 'net-ping',
- 'PathTools' => 'File-Spec',
- 'PodParser' => 'Pod-Parser',
+ 'Digest' => 'digest-base',
+ 'Locale-Maketext' => 'locale-maketext',
+ 'Net-Ping' => 'net-ping',
+ 'PathTools' => 'File-Spec',
+ 'PodParser' => 'Pod-Parser',
+ 'Set-Scalar' => 'set-scalar',
+ 'Tie-EncryptedHash' => 'tie-encryptedhash',
);
sub prepare {
my $prereqs = $mod->status->prereqs;
my @depends;
for my $prereq (sort keys %$prereqs) {
+ next if $prereq =~ /^perl(?:-|\z)/;
my $obj = $int->module_tree($prereq);
unless ($obj) {
error 'Wrong module object -- aborting';
}
msg 'Adding Manifest entry for ' . $stat->dist;
- unless (scalar run command => [ 'ebuild', $file, 'manifest' ], verbose => 0) {
- error 'ebuild manifest failed -- aborting';
+ my ($success, $errmsg) = run command => [ 'ebuild', $file, 'manifest' ],
+ verbose => 0;
+ unless ($success) {
+ error "$errmsg -- aborting";
1 while unlink $file;
return 0;
}
my @cmd = ('emerge', '=' . $stat->eb_name . '-' . $stat->eb_version);
unshift @cmd, $sudo if $sudo;
- unless (run command => \@cmd, verbose => 1) {
- error 'emerge failed -- aborting';
+ my ($success, $errmsg) = run command => \@cmd,
+ verbose => 1;
+ unless ($success) {
+ error "$errmsg -- aborting";
return 0;
}
my @cmd = ('emerge', '-C', '=' . $stat->eb_name . '-' . $stat->eb_version);
unshift @cmd, $sudo if $sudo;
- unless (run command => \@cmd, verbose => 1) {
- error 'emerge -C failed -- aborting';
+ my ($success, $errmsg) = run command => \@cmd,
+ verbose => 1;
+ unless ($success) {
+ error "$errmsg -- aborting";
return 0;
}
Vincent Pit, C<< <perl at profvince.com> >>, L<http://www.profvince.com>.
+You can contact me by mail or on C<irc.perl.org> (vincent).
+
=head1 BUGS
Please report any bugs or feature requests to C<bug-cpanplus-dist-gentoo at rt.cpan.org>, or through the web interface at L<http://rt.cpan.org/NoAuth/ReportBug.html?Queue=CPANPLUS-Dist-Gentoo>. I will be notified, and then you'll automatically be notified of progress on your bug as I make changes.