use Test::More tests => 1;
use CPAN::YACSmoke;
my $trail;
my %config = (
audit_log => 'audit.log',
audit_cb => \&myaudit,
verbose => 0
);
SKIP: {
skip "Cannot test due to CPANPLUS hooks", 1;
}
## NOTES:
## Can't test the following inside CPANPLUS, as there is a copy of
## CPANPLUS::Backend already instanstiated, which will override any
## settings, including the registering callbacks, which are used to
## collect the reports
#eval{test(\%config, 'Games-Trackword-1.02.tar.gz')};
#like($trail,qr/Ignoring Games-Trackword-1.02/);
#my @lines = eval {test('B/BA/BARBIE/Games-Trackword-1.02.tar.gz')};
#$text = join('',@lines);
#like($text,qr!All tests successful!s);
#is(mark('Games-Trackword-1.02'),'pass');
sub myaudit {
$trail .= join("\n",@_) . "\n";
}