Mercurial > pub > Impl

annotate Lib/IMPL/Web/NotAllowedException.pm @ 229:47f77e6409f7

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
heavily reworked the resource model of the web application: *some ResourcesContraact functionality moved to Resource +Added CustomResource *Corrected action handlers
author sergey
date Sat, 29 Sep 2012 02:34:47 +0400
parents
children 6d8092d8ce1b
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
229
47f77e6409f7 heavily reworked the resource model of the web application:
sergey
parents:
diff changeset
1 package IMPL::Web::NotAllowedException;
47f77e6409f7 heavily reworked the resource model of the web application:
sergey
parents:
diff changeset
2 use strict;
47f77e6409f7 heavily reworked the resource model of the web application:
sergey
parents:
diff changeset
3
47f77e6409f7 heavily reworked the resource model of the web application:
sergey
parents:
diff changeset
4 use IMPL::lang qw(:constants);
47f77e6409f7 heavily reworked the resource model of the web application:
sergey
parents:
diff changeset
5 use IMPL::declare {
47f77e6409f7 heavily reworked the resource model of the web application:
sergey
parents:
diff changeset
6 base => [
47f77e6409f7 heavily reworked the resource model of the web application:
sergey
parents:
diff changeset
7 'IMPL::Web::Exception' => sub {
47f77e6409f7 heavily reworked the resource model of the web application:
sergey
parents:
diff changeset
8 my %args = @_;
47f77e6409f7 heavily reworked the resource model of the web application:
sergey
parents:
diff changeset
9 $args{Message};
47f77e6409f7 heavily reworked the resource model of the web application:
sergey
parents:
diff changeset
10 }
47f77e6409f7 heavily reworked the resource model of the web application:
sergey
parents:
diff changeset
11 ]
47f77e6409f7 heavily reworked the resource model of the web application:
sergey
parents:
diff changeset
12 };
47f77e6409f7 heavily reworked the resource model of the web application:
sergey
parents:
diff changeset
13
47f77e6409f7 heavily reworked the resource model of the web application:
sergey
parents:
diff changeset
14 sub CTOR {
47f77e6409f7 heavily reworked the resource model of the web application:
sergey
parents:
diff changeset
15 my %args = @_;
47f77e6409f7 heavily reworked the resource model of the web application:
sergey
parents:
diff changeset
16
47f77e6409f7 heavily reworked the resource model of the web application:
sergey
parents:
diff changeset
17 $this->headers({
47f77e6409f7 heavily reworked the resource model of the web application:
sergey
parents:
diff changeset
18 allow => $args{allow}
47f77e6409f7 heavily reworked the resource model of the web application:
sergey
parents:
diff changeset
19 });
47f77e6409f7 heavily reworked the resource model of the web application:
sergey
parents:
diff changeset
20 }
47f77e6409f7 heavily reworked the resource model of the web application:
sergey
parents:
diff changeset
21
47f77e6409f7 heavily reworked the resource model of the web application:
sergey
parents:
diff changeset
22 sub status {
47f77e6409f7 heavily reworked the resource model of the web application:
sergey
parents:
diff changeset
23 "405 Method Not Allowed"
47f77e6409f7 heavily reworked the resource model of the web application:
sergey
parents:
diff changeset
24 }
47f77e6409f7 heavily reworked the resource model of the web application:
sergey
parents:
diff changeset
25
47f77e6409f7 heavily reworked the resource model of the web application:
sergey
parents:
diff changeset
26 1;
47f77e6409f7 heavily reworked the resource model of the web application:
sergey
parents:
diff changeset
27
47f77e6409f7 heavily reworked the resource model of the web application:
sergey
parents:
diff changeset
28 __END__