package
Example::View::Errors::HTML;
use
Moose;
use
Example::Syntax;
sub
http_default(
$self
,
$c
,
$code
,
%args
) {
$c
->view(
'HTML::Errors::Default'
,
status_code
=>
$code
,
%args
)->respond(
$code
);
}
sub
http_404(
$self
,
$c
,
%args
) {
$c
->view(
'HTML::Errors::NotFound'
,
%args
)->respond(404);
}
sub
http_403(
$self
,
$c
,
%args
) {
$c
->view(
'HTML::Errors::Forbidden'
,
%args
)->respond(403);
}
__PACKAGE__->meta->make_immutable;