Mercurial > pub > Impl

comparison Lib/IMPL/Security/Role.pm @ 73:2f31ecabe9ea

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
doc security
author wizard
date Mon, 29 Mar 2010 06:56:05 +0400
parents a1498298d3ee
children 79bf75223afe
comparison
equal deleted inserted replaced
72:eac47fa4f262 73:2f31ecabe9ea
3 use base qw(IMPL::Object); 3 use base qw(IMPL::Object);
4 4
5 use IMPL::Class::Property; 5 use IMPL::Class::Property;
6 6
7 BEGIN { 7 BEGIN {
8 public property roleName => prop_get; 8 public property roleName => prop_get | owner_set;
9 public property parentRoles => prop_get; 9 public property parentRoles => prop_get | owner_set | prop_list;
10 } 10 }
11 11
12 sub CTOR { 12 sub CTOR {
13 my ($this,$name,$parentRoles) = @_; 13 my ($this,$name,$parentRoles) = @_;
14 14
37 37
38 __END__ 38 __END__
39 39
40 =pod 40 =pod
41 41
42 =head1 NAME
43
44 C<IMPL::Security::Role> Роль
45
42 =head1 DESCRIPTION 46 =head1 DESCRIPTION
43 47
44 Роль. Может включать в себя базовые роли. 48 Может включать в себя базовые роли.
45 Имеется метод для проверки наличия необходимых ролей в текущей роли. 49 Имеется метод для проверки наличия необходимых ролей в текущей роли.
46 50
47 =head1 MEMBERS 51 =head1 MEMBERS
48 52
49 =over 53 =over
50 54
51 =item C<roleName> 55 =item C<[get] roleName>
52 56
53 Имя роли, ее идентификатор 57 Имя роли, ее идентификатор
54 58
55 =item C<parentRoles> 59 =item C<[get,list] parentRoles>
56 60
57 Список родительских ролей 61 Список родительских ролей
58 62
59 =item C<Satisfy(@roles_list)> 63 =item C<Satisfy(@roles_list)>
60 64