[dbsrgits/DBIx-Class-Tree.git] / t / 10_adjacencylist.t

# vim: filetype=perl:ts=8:sw=4:sts=4:et
use strict;
use warnings;
use lib 't/lib';

use Test::More;
use TreeTest;

TreeTest::Schema::Node->load_components(qw(
    Tree::AdjacencyList
));

TreeTest::Schema::Node->parent_column( 'parent_id' );

my $tests = TreeTest::count_tests();
plan tests => $tests;
TreeTest::run_tests();

1;
Commit	Line	Data
82958127	1	# vim: filetype=perl:ts=8:sw=4:sts=4:et
	2	use strict;
	3	use warnings;
	4	use lib 't/lib';
	5
	6	use Test::More;
	7	use TreeTest;
	8
	9	TreeTest::Schema::Node->load_components(qw(
	10	Tree::AdjacencyList
	11	));
	12
	13	TreeTest::Schema::Node->parent_column( 'parent_id' );
	14
	15	my $tests = TreeTest::count_tests();
	16	plan tests => $tests;
	17	TreeTest::run_tests();
	18
	19	1;