Mercurial > pub > Impl

comparison Lib/IMPL/Security/Context.pm @ 158:a9f4ba4783eb

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Minor changes
author wizard
date Tue, 02 Nov 2010 20:17:22 +0300
parents 92c850d0bdb9
children 4267a2ac3d46
comparison
equal deleted inserted replaced
157:c7652cf29a80 158:a9f4ba4783eb
79 } 79 }
80 80
81 sub Satisfy { 81 sub Satisfy {
82 my ($this,@roles) = @_; 82 my ($this,@roles) = @_;
83 83
84 my $roleEffective = new IMPL::Security::Role ( _effective => $this->rolesAssigned ); 84 my $roleEffective = new IMPL::Security::Role ( _effective => scalar $this->rolesAssigned );
85 85
86 return $roleEffective->Satisfy(@roles); 86 return $roleEffective->Satisfy(@roles);
87 } 87 }
88 88
89 1; 89 1;