use strict;
use warnings;
use lib 't/issues/gh-1230/lib';
use Test::More 'tests' => 4 + 5 + 9;
use Test::Fatal qw<exception>;
use Plack::Test ();
use Module::Runtime qw<require_module>;
use HTTP::Request::Common qw<GET>;
my $app;
is(
exception {
require_module('App');
$app = App->to_app;
},
undef,
'No exception when creating new app',
);
isa_ok( $app, 'CODE' );
my $test = Plack::Test->create($app);
my $response = $test->request( GET '/' );
is( $response->code, 200, 'Correct response code' );
is( $response->content, 'OK', 'Correct response content' );