Skip to content
This repository
branch: stream-buffered
Fetching contributors…

Octocat-spinner-32-eaf2f5

Cannot retrieve contributors at this time

file 29 lines (23 sloc) 0.635 kb
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
use strict;
use warnings;
use Test::More;
use Plack::Builder;
use HTTP::Request::Common;
use Plack::Test;

plan tests => 5;

my $app = sub {
    [200, ['Content-Type', 'text/plain'], ['ok']]
};

ok my $builder = Plack::Builder->new();
$builder->add_middleware('Runtime');
$app = $builder->mount('/app/foo/bar' => $app);
$builder->add_middleware('XFramework', framework => 'Plack::Builder');
$app = $builder->to_app($app);
ok $app;

test_psgi $app, sub {
    my $cb = shift;

    my $res = $cb->(GET "/app/foo/bar");
    ok $res->header('X-Runtime');
    is $res->header('X-Framework'), 'Plack::Builder';
    is $res->content, "ok";
};
Something went wrong with that request. Please try again.