Mercurial > pub > Impl
diff Lib/IMPL/Security.pm @ 172:068acfe903c3
corrected schema resolution mechanism
author | sourcer |
---|---|
date | Mon, 20 Jun 2011 23:42:44 +0400 |
parents | 4267a2ac3d46 |
children | d1676be8afcc |
line wrap: on
line diff
--- a/Lib/IMPL/Security.pm Mon Jun 06 03:30:36 2011 +0400 +++ b/Lib/IMPL/Security.pm Mon Jun 20 23:42:44 2011 +0400 @@ -11,7 +11,7 @@ sub AccessCheck { my ($self, $object, $desiredAccess, $context) = @_; - $context = IMPL::Security::Context->contextCurrent; + $context ||= IMPL::Security::Context->contextCurrent; $_->() or return 0 foreach @{$self->Rules};