Mercurial > pub > Impl

annotate Lib/IMPL/Web/NotAllowedException.pm @ 332:04a093f0a5a6

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
IMPL::Web::Application refactoring: resources are created per client request
author cin
date Sun, 09 Jun 2013 21:48:57 +0400
parents 673581380e79
children
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
230
6d8092d8ce1b *reworked IMPL::Security
sergey
parents: 229
diff changeset
4 use IMPL::Const qw(:prop);
229
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 => [
302
673581380e79 Added templates provider functionality to controls
cin
parents: 230
diff changeset
7 'IMPL::Web::Exception' => '@_'
229
47f77e6409f7 heavily reworked the resource model of the web application:
sergey
parents:
diff changeset
8 ]
47f77e6409f7 heavily reworked the resource model of the web application:
sergey
parents:
diff changeset
9 };
47f77e6409f7 heavily reworked the resource model of the web application:
sergey
parents:
diff changeset
10
302
673581380e79 Added templates provider functionality to controls
cin
parents: 230
diff changeset
11 use IMPL::Resources::Strings {
673581380e79 Added templates provider functionality to controls
cin
parents: 230
diff changeset
12 message => "The requested method isn't allowed"
673581380e79 Added templates provider functionality to controls
cin
parents: 230
diff changeset
13 };
673581380e79 Added templates provider functionality to controls
cin
parents: 230
diff changeset
14
229
47f77e6409f7 heavily reworked the resource model of the web application:
sergey
parents:
diff changeset
15 sub CTOR {
230
6d8092d8ce1b *reworked IMPL::Security
sergey
parents: 229
diff changeset
16 my $this = shift;
229
47f77e6409f7 heavily reworked the resource model of the web application:
sergey
parents:
diff changeset
17 my %args = @_;
47f77e6409f7 heavily reworked the resource model of the web application:
sergey
parents:
diff changeset
18
47f77e6409f7 heavily reworked the resource model of the web application:
sergey
parents:
diff changeset
19 $this->headers({
47f77e6409f7 heavily reworked the resource model of the web application:
sergey
parents:
diff changeset
20 allow => $args{allow}
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 }
47f77e6409f7 heavily reworked the resource model of the web application:
sergey
parents:
diff changeset
23
47f77e6409f7 heavily reworked the resource model of the web application:
sergey
parents:
diff changeset
24 sub status {
47f77e6409f7 heavily reworked the resource model of the web application:
sergey
parents:
diff changeset
25 "405 Method Not Allowed"
47f77e6409f7 heavily reworked the resource model of the web application:
sergey
parents:
diff changeset
26 }
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 1;
47f77e6409f7 heavily reworked the resource model of the web application:
sergey
parents:
diff changeset
29
47f77e6409f7 heavily reworked the resource model of the web application:
sergey
parents:
diff changeset
30 __END__