#!/usr/bin/perl
#use lib '../Test-Simple-0.86/lib';
use strict;
use warnings;
use lib 'lib', 't/lib';
use Test::Aggregate;
my $dump = 'done_testing.t';
my $tests = Test::Aggregate->new(
{
dirs => 'aggtests',
matching => qr/subs/,
# dump => $dump,
}
);
$tests->run;
my $tests_run = Test::Builder->new->current_test;
is $tests_run, 1,
'... and we should only run as many tests as are in the matching tests';
#unlink $dump or warn "Cannot unlink ($dump): $!";