Mercurial > pub > Impl
comparison Lib/IMPL/Security.pm @ 74:84aa8c395fce
doc
minor fixes
author | wizard |
---|---|
date | Mon, 29 Mar 2010 17:40:06 +0400 |
parents | 2f31ecabe9ea |
children | 67eb8eaec3d4 |
comparison
equal
deleted
inserted
replaced
73:2f31ecabe9ea | 74:84aa8c395fce |
---|---|
65 | 65 |
66 my $this = shift; | 66 my $this = shift; |
67 | 67 |
68 #forced delegation | 68 #forced delegation |
69 my $delegatedContext = IMPL::Security::Context->new( | 69 my $delegatedContext = IMPL::Security::Context->new( |
70 Principal => IMPL::Security::Principal->new( | 70 principal => IMPL::Security::Principal->new( |
71 Name => 'suser' | 71 name => 'suser' |
72 ), | 72 ), |
73 AssignedRoles => ['administrator'] | 73 rolesAssigned => ['administrator'] |
74 ) | 74 ) |
75 | 75 |
76 my $result; | 76 my $result; |
77 | 77 |
78 $delegatedContext->Impersonate(sub{ | 78 $delegatedContext->Impersonate(sub{ |