Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Fetching contributors…

Cannot retrieve contributors at this time

23 lines (17 sloc) 0.305 kB
use strict;
use Test::More;
my $builder = sub {
use Plack::Builder;
builder {
mount "/foo" => sub { };
sub { warn @_ };
};
};
my @warn;
{
local $SIG{__WARN__} = sub { push @warn, @_ };
my $app = $builder->();
ok $app;
}
like $warn[0], qr/mount/;
done_testing;
Jump to Line
Something went wrong with that request. Please try again.