Mercurial > pub > Impl
view Lib/Security.pm @ 122:a7efb3117295
Fixed bug in IMPL::DOM::Navigator::selectNodes
Fixed bug in IMPL::DOM::Node::selectNodes
renamed operator 'type' to 'typeof' in IMPL::Object::Abstract
A proper implementation of the IMPL::DOM::Node::nodeProperty and a related changes in the IMPL::DOM::Property module, now the last is very simple.
author | wizard |
---|---|
date | Tue, 08 Jun 2010 20:12:45 +0400 |
parents | 16ada169ca75 |
children |
line wrap: on
line source
use strict; package Security; use constant { AUTH_FAILED => 0, AUTH_SUCCESS => 1, AUTH_INCOMPLETE => 2, AUTH_NOAUTH => 3 }; my $CurrentSession; sub CurrentSession { my ($class,$newSession) = @_; $CurrentSession = $newSession if @_>=2; return $CurrentSession; } 1;