view Lib/IMPL/Web/ForbiddenException.pm @ 370:cbf4febf0930

ObjectMeta, Tests, migrating to the new metadata model.
author sergey
date Tue, 10 Dec 2013 03:02:01 +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