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
33
34
|
# plugin_multiple_apps.t
use strict;
use warnings;
use Test::More;
use Plack::Test;
use HTTP::Request::Common;
use Ref::Util qw<is_coderef>;
{
package App;
BEGIN {
use Dancer2;
set session => 'Simple';
}
use lib '.';
use t::lib::SubApp1 with => { session => engine('session') };
use t::lib::SubApp2 with => { session => engine('session') };
}
my $app = Dancer2->psgi_app;
ok( is_coderef($app), '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;
|
