Commit | Line | Data |
c11aa533 |
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; |
c11aa533 |
7 | |
0b7e9d74 |
8 | BEGIN { # This must happen before the schema is loaded |
9 | |
10 | require TreeTest::Schema::Node; |
11 | |
12 | TreeTest::Schema::Node->load_components(qw( |
c11aa533 |
13 | Tree::AdjacencyList::Ordered |
0b7e9d74 |
14 | )); |
c11aa533 |
15 | |
0b7e9d74 |
16 | TreeTest::Schema::Node->position_column( 'position' ); |
17 | TreeTest::Schema::Node->parent_column( 'parent_id' ); |
18 | } |
c11aa533 |
19 | |
0b7e9d74 |
20 | use TreeTest; |
c11aa533 |
21 | my $tests = TreeTest::count_tests(); |
22 | plan tests => $tests; |
23 | TreeTest::run_tests(); |
24 | |
25 | 1; |