1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
|
# plugin_multiple_apps.t
use strict;
use warnings;
use Test::More;
use Plack::Test;
use HTTP::Request::Common;
{
package App;
BEGIN {
use Dancer2;
set session => 'Simple';
}
use t::lib::SubApp1 with => { session => engine('session') };
use t::lib::SubApp2 with => { session => engine('session') };
}
my $app = Dancer2->psgi_app;
is( ref $app, 'CODE', 'Got app' );
test_psgi $app, sub {
my $cb = shift;
is( $cb->( GET '/subapp1' )->content, 1, '/subapp1' );
is( $cb->( GET '/subapp2' )->content, 2, '/subapp2' );
};
done_testing;
|
