use strict;
use warnings;
use Test::More;

{

    package Foo;
    use Moo;
    with 'Dancer2::Core::Role::Server';

    sub _build_name {'Foo'}
}

use Dancer2::Core::Runner;
my $runner = Dancer2::Core::Runner->new( caller => __FILE__ );

my $f = Foo->new( host => 'localhost', port => 3000, runner => $runner );
my $app = Dancer2::Core::App->new( name => 'foo' );

$f->register_application($app);
is $f->apps->[0]->name, 'foo';

is $f->host, 'localhost';
is $f->port, 3000;
ok( !$f->is_daemon );

ok( defined $f->dispatcher );
is ref( $f->psgi_app ), 'CODE';

done_testing;