Mercurial > pub > Impl
view Lib/IMPL/Security/Rule/RoleCheck.pm @ 285:546957c50a36
*IMPL::Web::Handler::TTView Reworked template selection mechanism
*IMPL::Web::Application: refactoring
-Removed obsolete IMPL::Text modules
author | cin |
---|---|
date | Mon, 18 Feb 2013 02:55:59 +0400 |
parents | 6d8092d8ce1b |
children |
line wrap: on
line source
package IMPL::Security::Rule::RoleCheck; use strict; require IMPL::Security::Role; sub SatisfyAll { my ($secPackage,$object,$desiredAccess,$context) = @_; my $roleEffective = new IMPL::Security::Role ( _effective => $context->rolesAssigned ); return $roleEffective->Satisfy(ExtractRoles($object)); } sub _ExtractRoles { return (); } 1;