view Lib/IMPL/Web/ForbiddenException.pm @ 365:7c621bb95e53

working on the metadata model
author sergey
date Mon, 02 Dec 2013 02:13:12 +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