comparison Lib/IMPL/Web/Security/Session.pm @ 166:4267a2ac3d46

Added Class::Template, Rewritten SQL::Schema 'use parent' directive instead of 'use base'
author wizard
date Sat, 23 Apr 2011 23:12:06 +0400
parents f017c0d7527c
children d1676be8afcc
comparison
equal deleted inserted replaced
165:76515373dac0 166:4267a2ac3d46
1 package IMPL::Web::Security::Session; 1 package IMPL::Web::Security::Session;
2 use strict; 2 use strict;
3 use base qw(IMPL::Security::Context); 3 use parent qw(IMPL::Security::Context);
4 4
5 use IMPL::Class::Property; 5 use IMPL::Class::Property;
6 6
7 __PACKAGE__->PassThroughArgs; 7 __PACKAGE__->PassThroughArgs;
8 8
25 =begin code 25 =begin code
26 26
27 # define a custom session for the application 27 # define a custom session for the application
28 28
29 package App::Session; 29 package App::Session;
30 use base qw(IMPL::Web::Security::Session); 30 use parent qw(IMPL::Web::Security::Session);
31 31
32 use IMPL::Class::Property; 32 use IMPL::Class::Property;
33 33
34 BEGIN { 34 BEGIN {
35 public property transactionId => prop_all; 35 public property transactionId => prop_all;
37 37
38 =end code 38 =end code
39 39
40 =head1 DESCRIPTION 40 =head1 DESCRIPTION
41 41
42 C<use base qw(IMPL::Security::Context)> 42 C<use parent qw(IMPL::Security::Context)>
43 43
44 Представляет собой контекст безопасности, имеет идентификатор. Является базовым классом 44 Представляет собой контекст безопасности, имеет идентификатор. Является базовым классом
45 для расширения дополнительными атрибутами. 45 для расширения дополнительными атрибутами.
46 46
47 =head1 MEMBERS 47 =head1 MEMBERS