Skip to content
This repository

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
branch: master
Fetching contributors…

Cannot retrieve contributors at this time

file 28 lines (20 sloc) 0.51 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;


{
    package T;
    use Ark;

    package T::Controller::Root;
    use Ark 'Controller';

    has '+namespace' => default => '';

    sub index :Path {
        my ($self, $c) = @_;
        die;
    }
}

use Ark::Test 'T', components => [qw/Controller::Root/];

my ($res, $c) = ctx_request(GET => '/');
is($res->code, 500, '500 ok');
is($res->content, 'Internal Server Error', 'error content ok');
like($c->error->[-1], qr/^Died at/, 'error msg ok');

done_testing;
Something went wrong with that request. Please try again.