Mercurial > pub > Impl

view Lib/DOM/Providers/Security.pm @ 19:1ca530e5c9c5

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
DOM схема, требует переработки в части схемы для описания схем. Автоверификация не проходит
author Sergey
date Fri, 11 Sep 2009 16:30:39 +0400
parents 03e58a454b20
children 16ada169ca75
line wrap: on
line source

use strict;

package DOM::Providers::Security;
use Security;

sub GetProviderInfo {
    return {
        Name => 'Security',
        Host => 'DOM::Site',
        Objects => {
            Session => \&GetSession
        }
    }
}

sub GetSession {
    return Security->CurrentSession;
}
1;