view Lib/IMPL/Web/ForbiddenException.pm @ 346:f05634287ac7

working on the view concept
author cin
date Mon, 30 Sep 2013 01:37:50 +0400
parents a8dbddf491dd
children
line wrap: on
line source

package IMPL::Web::ForbiddenException;
use strict;

use IMPL::declare {
	base => {
		'IMPL::Web::Exception' => '@_'
	}
};

use IMPL::Resources::Strings {
    message => "You don't have access to this resource"
};

sub status {
	"403 Forbidden"
}

1;

__END__

=pod

=head1 NAME

C<IMPL::Web::ForbiddenException> - операция не разрешается.

=cut