[dbsrgits/DBIx-Class-UUIDColumns.git] / t / manifest.t

#!perl -wT
# $Id$
use strict;
use warnings;

BEGIN {
    use lib 't/lib';
    use DBIC::Test;

    plan skip_all => 'set TEST_AUTHOR to enable this test' unless $ENV{TEST_AUTHOR};

    eval 'use Test::CheckManifest 0.09';
    if($@) {
        plan skip_all => 'Test::CheckManifest 0.09 not installed';
    };
};

ok_manifest({
    exclude => ['/t/var', '/cover_db'],
    filter  => [qr/\.svn/, qr/cover/, qr/Build(.(PL|bat))?/, qr/_build/],
    bool    => 'or'
});
Commit	Line	Data
a19bdae0	1	#!perl -wT
	2	# $Id$
	3	use strict;
	4	use warnings;
	5
	6	BEGIN {
	7	use lib 't/lib';
	8	use DBIC::Test;
	9
	10	plan skip_all => 'set TEST_AUTHOR to enable this test' unless $ENV{TEST_AUTHOR};
	11
	12	eval 'use Test::CheckManifest 0.09';
	13	if($@) {
	14	plan skip_all => 'Test::CheckManifest 0.09 not installed';
	15	};
	16	};
	17
	18	ok_manifest({
	19	exclude => ['/t/var', '/cover_db'],
	20	filter => [qr/\.svn/, qr/cover/, qr/Build(.(PL\|bat))?/, qr/_build/],
	21	bool => 'or'
	22	});