4 |
|
|
5 |
my $debug = @ARGV ? 1 : 0; |
my $debug = @ARGV ? 1 : 0; |
6 |
|
|
7 |
use Test::More tests => 15; |
use Test::More tests => 22; |
8 |
use lib 'lib'; |
use lib 'lib'; |
9 |
|
|
10 |
use Data::Dump qw/dump/; |
use Data::Dump qw/dump/; |
27 |
}, |
}, |
28 |
has_tests => ["t/06-Frey-Feed.t"], |
has_tests => ["t/06-Frey-Feed.t"], |
29 |
}, |
}, |
30 |
|
'App::RoomReservation' => { |
31 |
|
attribute_order => [], |
32 |
|
includes => { "use" => ["Moose", "App::RoomReservation::Room"] }, |
33 |
|
has_tests => ["t/App/RoomReservation.t"], |
34 |
|
} |
35 |
}; |
}; |
36 |
|
|
37 |
foreach my $class ( keys %$test ) { |
foreach my $class ( keys %$test ) { |