Mercurial > pub > Impl
annotate Lib/IMPL/Web/UnauthorizedException.pm @ 251:9f394b27dccf
require can handle recursive module references
author | sergey |
---|---|
date | Fri, 16 Nov 2012 16:44:16 +0400 |
parents | f48a1a9f4fa2 |
children |
rev | line source |
---|---|
241
f48a1a9f4fa2
+Added ViewResult to allow implementation of the view environment.
sergey
parents:
diff
changeset
|
1 package IMPL::Web::UnauthorizedException; |
f48a1a9f4fa2
+Added ViewResult to allow implementation of the view environment.
sergey
parents:
diff
changeset
|
2 use strict; |
f48a1a9f4fa2
+Added ViewResult to allow implementation of the view environment.
sergey
parents:
diff
changeset
|
3 |
f48a1a9f4fa2
+Added ViewResult to allow implementation of the view environment.
sergey
parents:
diff
changeset
|
4 use IMPL::declare { |
f48a1a9f4fa2
+Added ViewResult to allow implementation of the view environment.
sergey
parents:
diff
changeset
|
5 base => { |
f48a1a9f4fa2
+Added ViewResult to allow implementation of the view environment.
sergey
parents:
diff
changeset
|
6 'IMPL::Web::Exception' => '@_' |
f48a1a9f4fa2
+Added ViewResult to allow implementation of the view environment.
sergey
parents:
diff
changeset
|
7 } |
f48a1a9f4fa2
+Added ViewResult to allow implementation of the view environment.
sergey
parents:
diff
changeset
|
8 }; |
f48a1a9f4fa2
+Added ViewResult to allow implementation of the view environment.
sergey
parents:
diff
changeset
|
9 |
f48a1a9f4fa2
+Added ViewResult to allow implementation of the view environment.
sergey
parents:
diff
changeset
|
10 sub status { |
f48a1a9f4fa2
+Added ViewResult to allow implementation of the view environment.
sergey
parents:
diff
changeset
|
11 "401 Unauthorized" |
f48a1a9f4fa2
+Added ViewResult to allow implementation of the view environment.
sergey
parents:
diff
changeset
|
12 } |
f48a1a9f4fa2
+Added ViewResult to allow implementation of the view environment.
sergey
parents:
diff
changeset
|
13 |
f48a1a9f4fa2
+Added ViewResult to allow implementation of the view environment.
sergey
parents:
diff
changeset
|
14 1; |
f48a1a9f4fa2
+Added ViewResult to allow implementation of the view environment.
sergey
parents:
diff
changeset
|
15 |
f48a1a9f4fa2
+Added ViewResult to allow implementation of the view environment.
sergey
parents:
diff
changeset
|
16 __END__ |
f48a1a9f4fa2
+Added ViewResult to allow implementation of the view environment.
sergey
parents:
diff
changeset
|
17 |
f48a1a9f4fa2
+Added ViewResult to allow implementation of the view environment.
sergey
parents:
diff
changeset
|
18 =pod |
f48a1a9f4fa2
+Added ViewResult to allow implementation of the view environment.
sergey
parents:
diff
changeset
|
19 |
f48a1a9f4fa2
+Added ViewResult to allow implementation of the view environment.
sergey
parents:
diff
changeset
|
20 =head1 NAME |
f48a1a9f4fa2
+Added ViewResult to allow implementation of the view environment.
sergey
parents:
diff
changeset
|
21 |
f48a1a9f4fa2
+Added ViewResult to allow implementation of the view environment.
sergey
parents:
diff
changeset
|
22 C<IMPL::Web::UnauthorizedException> - запрос требует идентификации пользователя. |
f48a1a9f4fa2
+Added ViewResult to allow implementation of the view environment.
sergey
parents:
diff
changeset
|
23 |
f48a1a9f4fa2
+Added ViewResult to allow implementation of the view environment.
sergey
parents:
diff
changeset
|
24 =cut |