comparison Lib/IMPL/Web/Security.pm @ 83:74bae30eb25e

(no commit message)
author wizard
date Tue, 13 Apr 2010 20:27:56 +0400
parents 077357224bec
children 6d3bca490556
comparison
equal deleted inserted replaced
82:3a4205e7b663 83:74bae30eb25e
40 } 40 }
41 41
42 sub MakeContext { 42 sub MakeContext {
43 my ($this,$principal,$roles,$auth) = @_; 43 my ($this,$principal,$roles,$auth) = @_;
44 44
45 return $this->sourceSession->insert( 45 return $this->sourceSession->create(
46 { 46 {
47 principal => $principal, 47 principal => $principal,
48 rolesAssigned => $roles, 48 rolesAssigned => $roles,
49 auth => $auth 49 auth => $auth
50 } 50 }