{
use Web::Simple 'EnvTest';
package EnvTest;
- dispatch {
+ sub dispatch_request {
sub (GET) {
- my $env = @_[ENV];
+ my $env = $_[PSGI_ENV];
[ 200,
[ "Content-type" => "text/plain" ],
[ 'foo' ]
return $c->response;
}
-run_request(GET 'http://localhost/');
+ok run_request(GET 'http://localhost/')->is_success;