diff options
Diffstat (limited to 't/03-delayed-response.t')
-rw-r--r-- | t/03-delayed-response.t | 8 |
1 files changed, 3 insertions, 5 deletions
diff --git a/t/03-delayed-response.t b/t/03-delayed-response.t index d86116d..a034f4a 100644 --- a/t/03-delayed-response.t +++ b/t/03-delayed-response.t @@ -7,8 +7,7 @@ use Plack::Client::Test; use HTTP::Message::PSGI; -my $app = <<'APP'; -sub { +my $app = sub { my $env = shift; return sub { my $cb = shift; @@ -33,8 +32,7 @@ sub { ] ]) }; -} -APP +}; test_tcp_plackup( $app, @@ -47,7 +45,7 @@ test_tcp_plackup( { my $apps = { - foo => eval $app, + foo => $app, }; my $base_uri = 'psgi-local://foo'; |