annotate Lib/IMPL/Web/NotAllowedException.pm @ 245:7c517134c42f

Added Unsupported media type Web exception corrected resourceLocation setting in the resource Implemented localizable resources for text messages fixed TT view scopings, INIT block in controls now sets globals correctly.
author sergey
date Mon, 29 Oct 2012 03:15:22 +0400
parents 6d8092d8ce1b
children 673581380e79
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 => [
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 {
230
6d8092d8ce1b *reworked IMPL::Security
sergey
parents: 229
diff changeset
15 my $this = shift;
229
47f77e6409f7 heavily reworked the resource model of the web application:
sergey
parents:
diff changeset
16 my %args = @_;
47f77e6409f7 heavily reworked the resource model of the web application:
sergey
parents:
diff changeset
17
47f77e6409f7 heavily reworked the resource model of the web application:
sergey
parents:
diff changeset
18 $this->headers({
47f77e6409f7 heavily reworked the resource model of the web application:
sergey
parents:
diff changeset
19 allow => $args{allow}
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
47f77e6409f7 heavily reworked the resource model of the web application:
sergey
parents:
diff changeset
23 sub status {
47f77e6409f7 heavily reworked the resource model of the web application:
sergey
parents:
diff changeset
24 "405 Method Not Allowed"
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
47f77e6409f7 heavily reworked the resource model of the web application:
sergey
parents:
diff changeset
27 1;
47f77e6409f7 heavily reworked the resource model of the web application:
sergey
parents:
diff changeset
28
47f77e6409f7 heavily reworked the resource model of the web application:
sergey
parents:
diff changeset
29 __END__