Mercurial > pub > Impl
diff Lib/IMPL/Security/Rule/RoleCheck.pm @ 94:79bf75223afe
Fixed security related bugs
author | wizard |
---|---|
date | Thu, 29 Apr 2010 01:31:27 +0400 |
parents | a1498298d3ee |
children | 4d0e1962161c |
line wrap: on
line diff
--- a/Lib/IMPL/Security/Rule/RoleCheck.pm Wed Apr 28 17:50:55 2010 +0400 +++ b/Lib/IMPL/Security/Rule/RoleCheck.pm Thu Apr 29 01:31:27 2010 +0400 @@ -5,7 +5,7 @@ sub SatisfyAll { my ($secPackage,$object,$desiredAccess,$context) = @_; - my $roleEffective = new IMPL::Security::Role ( effective => $context->AssignedRoles ); + my $roleEffective = new IMPL::Security::Role ( _effective => $context->rolesAssigned ); return $roleEffective->Satisfy(ExtractRoles($object)); }