Mercurial > pub > Impl

diff 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
line wrap: on
line diff
--- a/Lib/IMPL/Security/Context.pm	Wed Oct 20 18:02:47 2010 +0400
+++ b/Lib/IMPL/Security/Context.pm	Tue Nov 02 20:17:22 2010 +0300
@@ -81,7 +81,7 @@
 sub Satisfy {
 	my ($this,@roles) = @_;
 	
-	my $roleEffective = new IMPL::Security::Role ( _effective => $this->rolesAssigned );
+	my $roleEffective = new IMPL::Security::Role ( _effective => scalar $this->rolesAssigned );
 	
 	return $roleEffective->Satisfy(@roles);
 }