#!/usr/bin/perl;
use strict;
use warnings;

mkdir( 't' ) unless -d 't';

unless( -e 't/Fennec.t' ) {
    open( my $fennect, '>', 't/Fennec.t' ) || die ( "Error creating test file: $!" );

    print $fennect <<'EOT';
#!/usr/bin/perl
use strict;
use warnings;

use Cwd;

use Fennec::Util::Alias qw/
    Fennec::Runner
/;

'Fennec::Runner'->init(
    parallel_files => 2,
    parallel_tests => 2,
    cull_delay => .01,
    handlers => [qw/ TAP /],
    random => 1,
    Collector => 'Files',
    ignore => undef,
    filetypes => [qw/ Module /],
    default_asserts => [qw/Core/],
    default_workflows => [qw/Spec Case Methods/],
);

Runner->run_tests;
EOT
    close( $fennect );
}

=head1 AUTHORS

Chad Granum L<exodist7@gmail.com>

=head1 COPYRIGHT

Copyright (C) 2010 Chad Granum

Fennec is free software; Standard perl licence.

Fennec is distributed in the hope that it will be useful, but WITHOUT
ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
FOR A PARTICULAR PURPOSE.  See the license for more details.
