Skip to content
Find file
Fetching contributors…
Cannot retrieve contributors at this time
23 lines (17 sloc) 305 Bytes
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.